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PREFACE 


The information in this book is intended for programming support 
representatives and system programmers who support the direct-access device 
space management (DADSM) routines. 


The manual has six sections: 


e ‘“Introduction,’”’ which presents general information about the DADSM 
routines, the control blocks used (data set control blocks), and the 
relationship of the data set control blocks (DSCBs) in the volume table of 
contents (VTOC). 


e ‘Method of Operation,” which describes in detail how each DADSM 
function does its work. Diagrams are used to relate the input and output of 
each routine to the processing steps. The diagrams also help (1) teach the 
DADSM techniques to those who are not familiar with them and (2) 
provide a rapid means of refreshing your knowledge and the understanding 
of DADSM. 


e “Program Organization,” which presents module-level flowcharts and 
module descriptions. 


e “Directory,” which briefly describes each of the DADSM routines, tells 
how each is called, and provides cross-references to the module names that 
appear on the microfiche of the assembled source listings, the flowcharts, 
and method of operation diagrams. 


e ‘Data Areas,’ which lists the control blocks used by the DADSM routines. 
This section also contains some of the work areas and tables used by 
DADSM. Other work areas and control blocks that are more widely used 
are contained in the OS/VS2 System Programming Library: Debugging 
Handbook, GC28-0708 and GC28-0709 (Volumes 1 and 2), or in 
OS/VS2 Data Areas, SYB8-0606. 


e ‘Diagnostic Aids,” which tells about some of the techniques that are used 
to find the sources of DADSM problems. A cross-reference to the 
messages issued by the scheduler component resulting from problems 
encountered in the DADSM Allocate routines is also included. 


The book is intended to be used with listings (or microfiche) of the assembled 
source code. 
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This book is written for system programmers who support and alter the design 
of the VS2 direct-access device space management (DADSM) routines. It is 
intended to provide information at two levels: 


1. General information about the DADSM routines:and their relationship to 
the operating system. 


2. Specific reference information concerning the operation of each of the 
routines and the control blocks they refer to and change. 


The text of the “Introduction” and ‘“‘Method of Operation” sections provide 
information at the first level for those who are not familiar with DADSM. The 
method of operation diagrams should be read in conjunction with the method 
of operation text by those readers who need information at the first level. 
Information about using the method of operation diagrams appears before the 
diagrams. 


For readers who are familiar with DADSM processing, the method of 
operation diagrams are intended as quick reference and refresher material. 
The cross-references to module names and labels within these modules can be 
used with the ‘“‘Program Organization’ section to provide detailed reference 
material. 


Non-ISAM data sets in this publication refers to data sets with sequential, 
partitioned, and direct (SAM, PAM, and DAM) organization and to data sets 
for which no access method is specified (EXCP access technique is assumed). 


VSAM data space is an expression used to describe the physical space on a 
volume that is maintained for VSAM data sets by the catalog routines. One or 
more VSAM data sets may reside in a VSAM data space. The system catalog 
routines manage the extents allocated to a VSAM data space; the DADSM 
routines treat a request for allocation of a VSAM data space as if it were a 
request for a non-ISAM data set allocation. 


For reference information on space allocation: 
« OS/VS Data Management Services Guide, GC26-3783 


For reference and “how-to” information on allocating, extending, and 
releasing space: 


¢ OS/VS2 JCL, GC28-0692 


For reference and “how-to” information on deleting data sets (SCRATCH 
macro instruction), renaming data sets (RENAME macro instruction), 
obtaining access to DSCBs (OBTAIN macro instruction), and protecting data 
sets (PROTECT macro instruction): 


« OS/VS2 System Programming Library: Data Management, GC26-3830 
For details about the System Management Facilities (SMF) records: 


¢ OS/VS2 System Programming Library: System Management Facilities 
(SMF), GC28-0706 


For reference and “‘how-to” information on using IEHLIST, IBCDASDI, and 
IEHDASDR: 


e OS/VSI1 Utilities, GC26-3901 
e OS/VS2 MVS Utilities, GC26-3902 


The O/C/EOV-DADSM service routine and the system recovery routines 
used by the DADSM component are described in OS/VS2 Open/Close/EOV 
Logic, SY26-3827. 


For data area layouts of intercomponent control blocks (for example, the 
DSCBs, the DEB, UCB, and SVRB): 


¢ OS/VS2 System Programming Library: Debugging Handbook, Volume 1, 
GC28-0708, and Volume 2, GC28-0709. (Both volumes can be ordered as 
GBOF-8211.) 


Data area layouts of the more widely used DADSM work areas (the Allocate, 
Scratch, Extend, and Partial Release work areas) are included in OS/VS2 
Data Areas, SYB8-0606, available only in microfiche. 


For information concerning access method logic: 

e OS/VS2 BDAM Logic, SY26-3831 

e OS/VS2 ISAM Logic, SY26-3833 

e OS/VS2 SAM Logic, SY26-3832 

e OS/VS2 VIO Logic, SY26-3834 

e OS/VS2 Virtual Storage Access Method (VSAM) Logic, SY26-3825 
For messages returned by the system: 


¢ OS/VS Message Library: VS2 System Messages, GC38-1002 
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SUMMARY OF AMENDMENTS 


Release 3.8 


OS/VS2 MVS Data Management Support for Mass 
Storage System (MSS) Extensions Program Product 


New Programming Support 


MSS Extensions program product is supported with this programming 
support. 


Revision 
August, 1978 


This revision incorporates information formerly contained in technical 
newsletters SN26-0819 and SN26-0862, (VS2.03.808) and System 
Supplement Newsletters SY26-3864 (5752-818), SY26-3869 (5752-832), 
and SD26-6003 (5752-860). 


OS/VS2 MVS Data Management Support Selectable 
Unit (5752-860) 


A common password/bypass function is provided in SCRATCH and 
RENAME. HSM will use this function while copying and restoring data sets 
to migration storage from public storage and vice versa. 


OS/VS2 MVS System Security Support Selectable Unit 
(5752-832) 


Resource Access Control Facility (RACF) Version 1, Release 2 
Support 


The Scratch Routine has been modified to check for authorization to a 
DASDVOL volume serial entity. 


VS2 MVS JES3 3850 MSS Selectable Unit (5752-818) 
New Programming Support 


The Scratch and Rename routines of DADSM have been modified to provide 
for JES3 support of the IBM 3850 Mass Storage System. 


VS2 MVS Data Management Selectable Unit 
(VS2.03.808) 


Resource Access Control Facility (RACF) Support 


The Allocate, Extend, Scratch, and Rename routines have been modified to 
define, redefine, and delete RACF-defined data sets. In addition, Rename 
and Scratch check RACF authorization to modify the definition. RACF 
provides support for the authorization checking of data sets defined to it. 


Summary of Amendments 13 


March 30, 1979 


Release 3.7 


New Programming Support 


Release 3 


New Programming Support 


Release 2 


The IBM 3344 Direct Access Storage and the IBM 3350 Direct Access 
Storage are supported in this release. 


The IBM 3850 Mass Storage System (MSS) is supported with this release. 
The MSS virtual volumes are functionally equivalent to the 3330/3333 Disk 
Storage, Model 1. 


System Integrity Improvements 


System Recovery Routines 


Virtual Input/Output (VIO) 
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The Allocate, Extend, Scratch, Rename, Obtain, LSPACE, and Partial 
Release routines have been modified to improve system integrity: 


e« Allocate and Extend automatically request space reclamation to recover 
and correct a VTOC following system failures and I/O errors that 
occurred during DADSM processing. 


e Scratch, Rename, Obtain, and LSPACE validate the addresses of work 
areas and lists of direct access volumes serial numbers passed to prevent 
inadvertent or malicious access to system resources. Before calling the 
Allocate routines, the supervisor component ensures that callers are either 
(1) executing in supervisor state or system storage protection key, or (2) 
are authorized under the Authorized Program Facility (APF). 


« To prevent deleting or renaming a data set that is (1) currently open or (2) 
allocated to an address space other than the one requesting the deletion or 
renaming, the system supervisor component checks data set and task status 
before calling the Scratch, Rename, and Partial Release routines. 


Recovery routines have been added to ensure that the entire system control 
program does not fail when errors occur in the DADSM routines. These 
recovery routines are entered under all abnormal termination conditions 
encountered in the DADSM routines. Their function is to release all storage 
obtained and resources enqueued upon during DADSM processing. They also 
gather diagnostic information concerning the abnormal termination condition 
and make it available for inspection (1) by user STAE and ESTAE routines 
and (2) in diagnostic dumps of virtual storage. The recovery routines used by 
DADSM are documented in OS/VS2 Open/Close/EOV Logic. 


Data Sets 


VIO data sets can be allocated and scratched under VS2 release 2. Other 
DADSM services are not supported or are invalid for VIO data sets: VIO data 
sets cannot be renamed; LSPACE processing is not viable, since VIO data 
sets reside on the system paging data sets; only the search option of obtain 
processing is provided; requests for releasing unused space are ignored; and a 
VIO data set cannot be extended. 


Suballocation and Split-Cylinder Data Set Support Eliminated 


C Two allocation options have been eliminated: the SUBALLOC and SPLIT 
DD statement parameters are no longer honored. The SUBALLOC and 
SPLIT values are converted by the system scheduler component to the 
equivalent values for a SPACE request and allocated as such. The code used 
to make allocations of these types has been removed from all of the DADSM 
routines, except for the code in the Scratch and VTOC Conversion routines. 


The Scratch routine code is needed to delete existing split-cylinder data sets 
and the VTOC Conversion support allows conversion of VTOCs containing 
format-6 DSCBs. 


Larger Load Modules 


The DADSM modules are executed in the pageable link pack area (PLPA). 
To avoid paging, it is desirable to put the functions that are executed 
consecutively in the same load module. The DADSM routines consist of 12 
load modules that comprise some 58 control sections (CSECTs), as indicated 
in the “Directory.’”’ A load module-to-object module cross-reference is 
provided. 


Transfer of Control 


The XCTL macro instruction, which was used in previous releases to transfer 
control among most of the DADSM object modules and to pass or return 
control to other system components, has been replaced by the IECRES macro 
instruction. This macro transfers control to the O/C/EOV-DADSM service 

Cc routine, IFGO19RA, which determines if the module containing the CSECT 
that is to receive control is currently loaded, and then transfers control by 
either loading the module containing the object module and branching to it or 
branching to it directly. The IECRES macro instruction is also used in the 
DADSM modules to get and free virtual storage and to establish the recovery 
routine address. 


Storage Protection Keys 


Storage protection has been enhanced in the DADSM routines, as in other 
system components, by the assumption of appropriate storage protection 
keys. Several DADSM routines, Partial Release, Extend, VTOC Conversion, 
and LSPACE, assume storage key 5 (data management key); however, user 
key 7 through 15 and key 0 are also assumed. 


VSAM Support in DADSM 


The addition of the virtual storage access method (VSAM) resulted in 

changes to the Extend and Obtain routines. VSAM data spaces are allocated 
and extended as if they were non-ISAM data sets. The catalog component 
allocates VSAM data sets from within these data spaces. The Obtain routine 
has been modified to read physical extent information for VSAM data sets 
from the master or user catalog. The Protect routine, SVC 98, is not used for 
data set protection for VSAM data sets. 
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RPS Support Simplified 


The implementation of DADSM support for direct-access devices with the 
rotational position sensing (RPS) feature has been simplified for this release 
of OS/VS2. The RPS set-up module, IGG029R1, has been eliminated. The 
functions provided by IGGO29R1 have been incorporated in the affected 
DADSM modules. Function and performance of the devices with RPS 
remains unchanged. 


Partial Release Routine Modifications 


In VS2, release 1, control was passed to the Partial Release routine from the 
Close and Checkpoint/Restart routines after the file mark had been written 
to denote the end of the data set for sequential and partitioned data sets. For 
this and subsequent VS2 releases, control is passed to the Partial Release 
routine before the file mark is written. In addition, the Partial Release 
routines will now write back the format-1 DSCB to the VTOC and dequeue 
the VTOC. This was previously done by the Close and Checkpoint/Restart 
routines after Partial Release returned control. 
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Cc INTRODUCTION 


Controlling Space on DASD Volumes 


The DADSM routines control allocation of space on direct-access volumes 
through the volume table of contents (VTOC) of that volume. The VTOC is 
built when the volume is initialized by the direct-access storage device 
initialization (IEHDASDR or IBCDASDI) utility program. See ‘““The Volume 
Table of Contents” in this section for more information about the VTOC. 


The VTOC is a collection of data set control blocks (DSCBs). The different 
types of DSCBs are: 


e Free VTOC record DSCB—format-0 
e Identifier DSCB—format-1 

e Index DSCB—format-2 

e Extension DSCB—format-3 

e VTOC DSCB—format-4 

e« Free space DSCB—format-5 

e Shared extent DSCB—format-6 


Each DSCB corresponds either to a data set or data space currently residing 
on the volume, or to contiguous, unassigned tracks on the volume. DSCBs are 
the data set labels, which contain characteristics of the data sets or data 

Cc spaces and a description of the tracks on which the data sets resides. DSCBs 
for unassigned tracks indicate the location of unassigned, contiguous tracks. 


The Allocate and Extend routines assign tracks and cylinders on direct-access 
volumes. The Allocate routines are used by the scheduler component to get 
space for new data sets. The Extend routine is called by the system catalog 
management and End-of-Volume components to get more space for a data 
set (or VSAM data space) that has already been allocated, but needs more 
space. Other DADSM routines (Scratch and Partial Release) are used to 
release space that is no longer needed on a direct-access volume. 


When space is needed on a volume, the DADSM routines check the VTOC 

for enough contiguous, available tracks to satisfy the request. If there are not 

enough contiguous tracks, the request is filled using as many as five 

noncontiguous groups of free tracks. The appropriate DSCBs are modified to 
g reflect the assignment of the tracks. 


When space is released, the DADSM routines delete the DSCBs of the 
deleted data set or data space. A free space (format-5) DSCB is built, or 
modified if existant, to indicate that the tracks containing the affected data set 
or data space can be reallocated. 
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DADSM Routines 


DADSM’s space management routines are concerned with: 


e Allocating primary space, which involves finding space for new data sets or 
for VSAM data spaces. These are the Allocate routines. 


e Allocating secondary space, which involves finding additional space for 
data sets or VSAM data spaces that have exceeded their original, primary 
allocations. This is the Extend routine. 


e Releasing space, which involves both deleting entire data sets or data 
spaces that are no longer needed, and freeing unused space in data sets 
that are being retained. These are the Scratch and Partial Release routines. 


DADSM’s VTOC-related service routines are concerned with: 
e Changing the names of data sets. This is the Rename routine. 


e Making control information available for examination. This is the Obtain 
routine. 


e Determining the space available on a direct-access volume. This is the 
LSPACE routine. 


e Maintaining the system PASSWORD data set, which controls access to 
data sets and their associated control information. This is the Protect 
routine. 


Allocating and Releasing Space on Direct-Access Volumes 
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The DADSM routines which allocate space (Allocate and Extend), and 
release space (Scratch and Partial Release), add, delete, and modify records 
of the VIOC. These records are called data set control blocks (DSCBs). To 
make space available to a new data set or to increase the space allocated to a 
data set, the appropriate DSCBs are searched for available space; the space is 
allocated to the data set by writing the description of the space, called an 
extent, to the data set’s DSCB and deleting the extent from the space 
available for allocation. To release space allocated to a data set, the allocate 
operation is reversed: the released extent is deleted from the data set’s DSCB 
and added to the DSCB that describes available space. 


Components of the operating system use the DADSM routines to allocate and 
release space in response to data definition (DD) statements. For example, 
job management (scheduler) routines call the Allocate routines to obtain 
space for a new data set. The End-of-Volume component of 
Open/Close/End-of-Volume (O/C/EOV) calls the Extend routine when an 
existing data set needs more space; the VS2 catalog management routines call 
the Extend routine to get more space for a VSAM data space; the VS2 
catalog management routines call the Extend routine to get more space fora 
VSAM data space; and the OS catalog management routines call the Extend 
routine to allocate additional space for an OS catalog. Similarly, job 
management routines use the Scratch routine to delete data sets, and the 
catalog management routines use the Scratch routine to delete a data set when 
uncataloging involves deleting a data set of a generation data group. Utility 
programs (IEHPROGM, IEHMOVE, and IEBCOPY) use the Scratch and 
Allocate routines. Scratch processing is also available to the system 
programmer through the SCRATCH macro instruction. 


The virtual storage access method (VSAM) allocates and releases space using 
the DADSM Allocate, Extend, and Scratch routines. These DADSM routines 
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are called by the VS2 catalog management routines to allocate, extend, and 
delete VSAM data spaces. 


The Partial Release routine is called by the Close routine of O/C/EOV to 
release unused space before a data set is closed. Partial Release is also called 
by the reposition-I/O routine of Checkpoint/Restart to release unused space. 


VTOC-Related Service Routines 


While Rename, Obtain, LSPACE, and Protect routines are used to read and 
change control information on the VTOC, none allocates or releases space. 
System macro instructions can be used to invoke the Rename, Obtain, and 
Protect routines (reference and “how-to” information for these macro 
instructions is provided in OS/VS2 System Programming Library: Data 
Management). 


The Rename routine finds the DSCB for a specified data set and changes its 
name, after verifying that the requested name does not duplicate one already 
on the volume. 


The Obtain routine finds the DSCB for a specified data set, then reads the 
DSCB into virtual storage. The Obtain routine is also used to get information 
about VSAM data sets from the VTOC, the VS2 master catalog, or a VSAM 
user catalog. 


The LSPACE routine is called either (1) by routines issuing demount 
messages for direct-access volumes (for example, scheduler and O/C/EOV) 
when the operator has issued a “MONITOR SPACE” command or (2) by the 
System Management Facilities (SMF). The available space on the volume is 
calculated by searching and totaling the extents contained in the free space 
(format-5) DSCBs. At the same time, the largest available extent on the 
volume is located. If SMF information is required, an SMF type-19 record is 
gathered and written to the SMF data set. 


The Protect routine adds, replaces, deletes, or lists entries in the PASSWORD 
data set. When the security protection status of a data set changes, the 
Protect routine also modifies the protection mode indicator field in the 
protected data set’s DSCB. 


The Volume Table of Contents 


The volume table of contents (VTOC) is a data set consisting of 140-byte 
data set control blocks (DSCBs) that describe the contents of a direct-access 
storage device volume. The VTOC data set resides in a single extent (that is, 
it is a continuous data set); its address is located in the VOLVTOC field of 
the standard volume label (see Figure 1). There are seven different kinds of 
DSCBs. Each has a different purpose and is, consequently, given a different 
name and format number. Figure 2 lists each DSCB and its use. 


The first record in every VTOC is the VITOC (format-4) DSCB that 
describes (1) the device that the volume resides on, (2) the attributes of the 
volume itself, and (3) the size and contents of the VTOC data set itself. 


The format-4 DSCB is followed by a free-space (format-5) DSCB, which lists 
the extents on the volume that have not been allocated to a data set or VSAM 
data space. Each format-5 DSCB contains 26 extents. If there are more than 
26 available extents on the volume, another format-5 DSCB will be built for 
every 26 extents. The format-5 DSCBs are chained using the last field of each 
format-5 DSCB. The third and subsequent DSCBs in the VTOC do not 
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Standard Volume Label } 


11(B) 


VOLVTOC (10 bytes) 
CCHHR of VTOC 
(format-4) DSCB 


/ 
/ 
/ 
/ 
Recorg 
1 Record] Record 
2 3 

VTOC Data Set 

(Can be located anywhere on 
the volume after cylinder 0, ey 


track 0, and following the 
volume label and IPL records.) 


F; 

tmat4l First 

DSCR Format-5 DSCB 1 ag 
DSCB 


Figure 1. The volume table of contents (VTOC) and how it’s located 


necessarily occupy continuous space, nor do they have any prescribed 
sequence. 


A data set or VSAM data space is defined by one, two, or three DSCBs in the 
VTOC of each volume on which it resides. The number of DSCBs needed to 
define a data set or VSAM data space is determined by (1) the organization 
of the data set (ISAM data sets need a format-2 DSCB to describe the index) 
and (2) the number of extents the data set or VSAM data space occupies (a 
format-3 DSCB is needed to describe the fourth through the sixteenth 
extents). Figure 3 shows the general makeup of a VTOC and the DSCBs 
needed to define two types of data sets (ISAM and non-ISAM). 


Data set A (in Figure 3) is an ISAM data set; three DSCBs, a format-1, 
format-2, and format-3, are required. Data sets B, C, and D could be 
sequential, partitioned, or direct data sets or VSAM data spaces. Data set B 
has more than three extents and therefore requires both a format-1 and a 
format-3 DSCB. 


Data sets C and D have three or fewer extents and need only a format-1 Jo 
DSCB. The format-6 DSCB, pointed to by the format-4 DSCB, is used to 

keep track of the extents allocated in order to be shared by two or more data 

sets (split-cylinder data sets). For example, if data sets C and D share an 


DSCB 
Name 


Identifier 


Index 


Extension 


VTOC 


Free Space 


Shared 
Extent 


Free VTOC 
Record 


Function 


Describes a data set or VSAM 


data space and the first 
three extents. 


Describes the indexes of an 
ISAM data set. 


Describes the 4th through 
16th extents of a data set 

or VSAM data space. (Data 
sets and VSAM data spaces 
are restricted to 16 

extents per volume.) 


Describes the extent and 
contents of the VTOC and 
volume and device 
characteristics. 


Describes the space on a 
volume that has not been 
allocated to a data set 

or to a VSAM data space 
(available space). 


Describes the extents shared 
by two or more data sets 
(split-cylinder extents). 


The unused records in the 
VTOC, which contain 140 
bytes of binary zeros. To 
delete a DSCB from the 
VTOC, a format-0 DSCB 
is written over it. 


How Many 


One for every data set or 
VSAM data space on the 
volume, except the VTOC. 


See “ISAM Data Set 
Allocation.” 


One for each data set or 
VSAM data space on the 
volume that has more than 
three extents. 


One on each volume. 


One for every 26 non- 
contiguous extents of 
available space on the 
volume. 


One for every 26 split- 
cylinder extents on the 
VTOC. 


One for every unused 140- 
byte record on the VTOC. 
The DS4DSREC field of the 
format-4 DSCB is a count 
of the number of format-0 
DSCBs on the VTOC. 


Figure 2. Data set control block (DSCB) format types and their use 


How Found 


Search on key equal to the 
data set name. 


Chained from a format-! DSCB 
that represents the data set. 


Chained from a format-2 ora 
format-1 DSCB that represents the 
data set or VSAM data space. 


VOLVTOC field of the standard 
volume label contains its address. 
It is always the first record in 

the VTOC. 


The first format-5 DSCB on the 
volume is always the second record 
of the VTOC. If there is more 

than one format-5 DSCB, it will be 
chained from the first format-5 DSCB 
via the DSSPTRDS field of each 
format-5 DSCB. 


The address of the first format-6 
DSCB is contained in the DS4F6PTR 
field of the format-4 DSCB. If there 
is more than one format-6 DSCB on 
the volume it will be chained to the 
first via the DS6PTRDS field of the 
format-6 DSCB. 


Search on key equal to X‘00’ 
(sometimes X‘00000000’). 


extent made up of one or more cylinders, this extent would be described in 
the format-6 DSCB. Note that split-cylinder data sets can no longer be 
allocated on VS2 systems, but existing split-cylinder data sets can still be 


processed. 


To prepare a volume for use (to initialize it), the IBCDASDI or IEHDASDR 
utility is used. One of the things these utilities do is build the VTOC. After 
initialization, this VTOC will contain a format-4 DSCB and a format-5 
DSCB. The format-5 DSCB contains an extent entry for all the free space on 
the volume; the initial number of extents in the format-5 DSCB is one or two, 
depending on where the VTOC is located on the volume. If the VTOC is 
located somewhere other than at the beginning or end of the volume, two 
extent entries are needed to describe the free space that precedes and 


follows it. 
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Standard Volume Label 


VTOC Data Set 


Data Set A 
eee 
Description of 
}; the data set and 

its first 3 extents 


Format-4 DSCB First F5 DSCB 


Description of 
26 available 
extents 


Description of 

device, volume, 
and the VTOC 
extent 


Ont 


Format-6 DSCB_ | Next Format-5 DSCB 


SS ES EE Ce 


Description of Description of 
as many as 26 as many as 26 
shared-cylinder available extents 
extents 


- Description of| : 
=the index of : 
date set A 


85 


Data Set D 


Format-1 DSCB 
Description of 


the data set and 
its first 3 extents 


_ Format-3 DSCB | { 
. Description of | 
the 4th-16th = 
extents of 
_ data set A 


re 


DSCB for an ISAM data 
set (Data Set A) 


DSCB fora 

non-ISAM data 

set (Data Sets B, C, D) 
or a VSAM data space 


Figure 3. The contents of the VTOC—DSCBs describing data sets 


Size of the Volume Table of Contents 


the 4th - 16th 
extents of 
data set B 


Data Set C 
Format-3 DSCB ~~ Format-1 DSCB 


Description of 


Data Set B 


Description of 


the data set and 
its first 3 extents 


Description of 
data set C and its 
first 3 extents 


Free VTOC Records 
(Format-0 DSCBs) 
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The number of DSCBs in the VTOC determines the number of data sets or 
VSAM data spaces that can reside on a volume and is therefore essential 
information for the DADSM routines that allocate and release space. 


The types of direct-access storage devices supported by this operating system 
and the number of DSCBs that will fit on a single track of each type, are: 


Direct-Access Device Type Number of DSCBs per Track 
IBM 2305-1 Fixed Head Storage 18/track 
IBM 2305-2 Fixed Head Storage 34/track 
IBM 2314 Direct-Access Storage Facility 25/track 
IBM 2319 Disk Storage 25/track 
IBM 3330 Disk Storage, models 1 and 11 39/track 
IBM 3333 Disk Storage and Control, 39/track 
models | and 11 

IBM 3340 Direct Access Storage Facility 27/track 
IBM 3344 Direct Access Storage 27/track 
IBM 3350 Direct Access Storage 47/track 


The DS4DSREC field of the format-4 DSCB contains a count of the number 
of free VTOC records (format-0 DSCBs) in the VTOC. This count is 
checked before each allocation. There must be enough free VTOC records for 
all the DSCBs required to define the data set or VSAM data space, as well as 
an extent or a combination of extents large enough to contain the data set or 
VSAM data space. The number of DSCBs needed to define a single data set 
or VSAM data space can be one, two, or three, depending on (1) whether it is 
an ISAM data set (a format-2 may be required) and (2) whether the data set 
has more than three extents (a format-3 DSCB is needed to list the fourth 
through the sixteenth extent). In addition, the DADSM Allocate routines 
make sure there is room for an additional format-5 in case it is necessary to 
create one during the allocation. 


Volume Table of Contents Integrity 


In an operating system with only one CPU, two or more tasks may require 
access to the same VTOC simultaneously for the purpose of reading or 
updating (that is, adding, deleting, or modifying DSCBs) that VTOC. If more 
than one CPU has access to the same device or devices, it becomes necessary 
to protect VTOCs from being accessed while the DADSM routines are in 
process. 


To be sure that a VTOC is not changed while the DADSM routines are in 
process, the DADSM routines issue RESERVE, ENQ, and DEQ macro 
instructions. These macro instructions provide exclusive control of the VTOC 
for the task issuing the macro instruction. The RESERVE macro instruction is 
needed for systems in which two or more CPUs are processing concurrently, 
using the same data sets. These macro instructions provide exclusive control 
of the VTOC for the task issuing the macro instruction. Depending on the 
macro instruction, the ‘‘set-must-complete”’ option or the 
“‘release-must-complete” option may be specified in an operand of the macro 
instruction. The Allocate, Extend, Scratch, Rename, Partial Release, 
LSPACE, and Protect routines of DADSM issue these macro instructions. Of 
these routines, only Allocate, Scratch, and Partial Release use SMC=STEP in 
the ENQ and RESERVE macros, and RMC=STEP in the DEQ macro. The 
Extend routine links to the status routine (rather than issuing the ENQ 
macro) to obtain “‘step-must-complete”’ status, if the task that called Extend 
has not already done so. 


The VS2 catalog management routines modify the DS4AMCAT and 
DS4AMTIM fields of the VTOC (format-4) DSCB. These routines also issue 
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the RESERVE, ENQ, and DEQ macro instructions to maintain exclusive 
control while making modifications. 


Note: When operating in an environment in which direct-access storage 
devices are not shared among systems, the RESERVE macro instruction 
defaults to (acts as) an ENQ macro instruction. 


DADSM Interrupt Recording Facility (DIRF) 


If a system fails or a permanent I/O error occurs during allocation of space or 
during a routine that updates the VTOC, the VTOC will probably be in error. 
To make sure the error is recorded, the DADSM routines use the DADSM 
interrupt-recording facility (DIRF). DIRF processing involves turning on a bit 
in the VTOC at entry to the DADSM function, and if no I/O errors occur 
during DADSM processing, turning it off again at exit from that function. 


This bit is called the DIRF bit and is bit 5 of the DS4VTOCI field of the 
format-4 DSCB. The Scratch and Partial Release routines also turn on the 
DIRF bit if they encounter overlapping extents in a format-5 DSCB. 


The next time an attempt is made to allocate space on a volume that has the 
DIRF bit set, the VTOC Conversion routine is invoked by Allocate or 
Extend, whichever is attempting to allocate more space on the volume. The 
VTOC Conversion routine builds new format-5 DSCBs to represent the 
available space on the volume, updates the format-4 DSCB, and returns to 
Allocate or Extend to continue the allocation. The ‘‘Diagnostic Aids” section 
tells how to deactivate the VTOC conversion by altering the DADSM 
routines. 


DADSM Recovery Routines 


To avert a complete system failure when an abnormal termination condition 
arises in DADSM processing, the DADSM routines include a recovery 
function. This function is given control by the recovery/termination manager 
(R/TM) when an abnormal termination condition is encountered in a 
DADSM routine. The same recovery routine is given control when an Open, 
Close, or EOV routine encounters an abnormal termination condition; the 
DADSM recovery function is therefore documented in OS/VS2 
Open/Close/EOV Logic. 


During the initialization of each DADSM function, the address of the 
recovery routine is established when virtual storage is obtained by the 
DADSM function. The O/C/EOV-DADSM recovery routine load module 
name is IFGORROA. Its address is established fora DADSM routine when 
the IECRES GET macro is issued for a work area. The functions of the 
IECRES macro, the expansion of which results in a branch to the 
O/C/EOV-DADSM service routine, IFGO19RA, are documented in 
OS/VS2 Open/Close/EOV Logic. 


The DADSM recovery routine saves diagnostic information in the 
SYS1.LOGREC, SYS1.DUMP, and GTF data sets, and then releases any 
resources obtained by the DADSM routine before it failed. 
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C 


METHOD OF OPERATION 


The Allocate Routines 


This section describes the functions of the DADSM routines, first in textual 
descriptions, followed by method of operation diagrams. The first diagram, 
Diagram 1, shows the contents of the other method of operation diagrams. 
Preceding Diagram 1 is a description of how to read method of operation 
diagrams. 


The Allocate routines find unused space on direct-access storage volumes and 
make that space available for new data sets. These routines create a format-1 
DSCB (data set control block) for each new data set, and in the format-1 
DSCB, write descriptions of the direct-access storage areas (these 
descriptions are called extents). Available extents are obtained by searching 
the format-5 DSCBs on the VTOC. Three routines are employed for making 
space allocations. Two of the sets of routines actually handle allocation of 
space (ISAM data set allocation routines and non-ISAM data set allocation 
routines); the third set (the VTOC Conversion routine) converts the VTOC 
of volumes on which allocations have been made under the Disk Operating 
System (DOS) to standard format before making an allocation. The VTOC 
Conversion routine is also called by the Allocate and Extend routines to 
reclaim VTOCs that have been invalidated by permanent I/O errors and 
system failures during DADSM processing. The non-ISAM Allocate routine 
handles the allocation of VSAM data spaces the same as allocation of 
non-ISAM data sets. All three sets of routines share the initialization 
procedures. 


These initialization procedures include establishing work areas, building 
control blocks, and initializing channel programs to read from and write to the 
VTOC, enqueuing the VTOC using a RESERVE macro instruction, and 
searching the VTOC for a data set of the same name as the data set 
requesting allocation. DADSM Interrupt Recording Facility (DIRF) 
processing is also performed as a part of the initialization procedures. These 
functions are diagramed only once for all three sets of Allocate routines. 


When DIRF processing is completed, it must next be determined whether (1) 
the data set being allocated is on a volume on which the last allocation was 
made by the Disk Operation System (DOS) or (2) the VTOC was invalidated 
during previous DADSM processing and must be reclaimed. In either case, the 
VTOC Conversion routine is given control to convert or reclaim the VTOC 
before the allocation is made. Control is passed to the VTOC Conversion 
routine and returned to the Allocate routine if the VTOC is converted or 
reclaimed without encountering any errors. Upon return, the channel program 
is reinitiated to search the VTOC for a data set of the same name as the data 
set requesting allocation. 


The Allocate routines receive control via an SVC 32. As input, they receive 
(1) a job file control block or a partial format-1 DSCB and (2) the address of 
the unit control block (UCB) for the device on which the data set is to be 
allocated. With requests for ISAM data set allocations a pointer to a list of the 
addresses of data set association blocks (DSABs) is also passed. 
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Non-ISAM Data Set (and VSAM Data Space) Allocation 


When initialization procedures have been completed and it has been verified 
that the non-ISAM data set or VSAM data space allocation request is not for 
a data set name already on the volume, this routine converts the space 
requested for data sets directories for partitioned data sets, and VSAM data 
spaces specified in cylinders and average records (block length) to the 
equivalent number of tracks. Note that when a VIO data set is being 
allocated, a format-1 DSCB is created in the scheduler work area. No 
additions to or modifications of a VTOC are necessary; therefore, none of the 
processing concerned with a real direct-access volume and its VTOC are 
necessary. 


Finding Free Space on the Volume 
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The non-ISAM Allocate routine reads in the first free space (format-5) DSCB 
on the VTOC of the specified volume, converts its extent to the 
RTA-plus-the-number-of-tracks format and searches the extents for an extent 
with the number of tracks the new data set or VSAM data space requires. If 
the space is not found in the first format-5 DSCB, the search is continued 
through the balance of the format-5 DSCBs on the volume until it is found or 
until the format-5 DSCBs are exhausted. If the volume does not contain 
enough available space for the data set or VSAM data space, control is 
returned to the calling routine, which may then specify another volume to be 
used for the data set or VSAM data space, unless a specific volume serial 
number has been specified by the user. 


When the space is found, the non-ISAM Allocate routine builds a table (see 
the extent table in the ‘“‘Data Areas’’ section) of the format-5 extents used to 
fill the request. The extent table can have as many as five entries. Several 
different methods of building the extent table are used depending on the 
options specified: 


e User Labels—lf user labels are specified, the user-label track is allocated 
from the smallest extent in the first format-5 DSCB. When cylinder 
requests specify user labels, the user label extent will be taken from tracks 
that cannot be used to fill cylinder requests. The user label extent is the 
first entry in the extent table; when the extent table entry has been made, 
the format-5 DSCB in the allocate work area is updated so that the track 
assigned for user labels is no longer available for allocation. 


e Zero Quantity Requests—For zero-quantity requests (requests that specify 
no space to be allocated), a format-1 DSCB is built, without extent entries, 
and written to the VTOC. If user labels are specified in a zero-quantity 
request, the format-1 DSCB will contain one extent, the user-label extent. 
Extent entries can be added later to the format-1 DSCB via secondary 
allocation (see the Extend routine). 


e Absolute Track Requests—For absolute-track allocation requests (requests 
indicating that the data set is to start at a specific track), the extent 
containing the specified track is located in the format-5 DSCB. If this 
extent contains enough space following the specific track to fill the request 
it is entered in the extent table. Absolute-track allocation is the Disk 
Operating System (DOS) allocation method. It is supported in this 
operating system to ensure compatibility. 


¢ Cylinder and Track Allocation—For normal, cylinder or track allocation 
requests, the request type (MXIG, CONTIG, ALX, or no-option-specified, 


as defined in Figure 4) is determined, and the extents required to fill the 
request are entered in the extent table. 


Option Allocation Method 


MXIG Allocate all the storage space in the single largest area on the volume, if 
that area is equal to or larger than the request. 


CONTIG Allocate the exact amount of space requested from one area on the 
volume that is equal to or larger than the request. 


ALX Build a list of as many as five areas of available storage that are the 
largest on the volume. If a user label has been requested, a list of as many 
as four areas is built. Allocate all the space in as many of the areas found 
that are equal to or larger than the request. 


No Option Build a list of as many as five areas that are smaller than but closest in 
Specified size to the request. If a user label has been requested, a list of as many 
(blank) as four areas is built. If, while building the list, an area is found equal to 


the request, that area is allocated and the list is disregarded. If no areas 
are found equal to the request but areas are found larger than the request, 
the amount of space requested is allocated from the area that is larger 
than but closest in size to the request, and the list is disregarded. If all 
available areas are smaller than the request, and if enough space is 
available in the areas in the list, the exact amount of the request is 
allocated from among the largest areas found. 


Note: For an ISAM data set only the CONTIG and the blank options are valid. 


Figure 4. DASD space request options and their associated initial allocation methods 


e VIO Data Set Allocations—If a VIO data set is being allocated, the space 
to be used for the data set will be in a system paging data set. A single 
extent (two extents if a user-label track is requested) will be allocated 
using a virtual DSCB, which represents space on the system paging data 
sets. The extent allocated will be equal to the primary extent plus 15 times 
the secondary extent quantity specified in the SPACE parameter of the DD 
statement. 


Building Format-1 and Format-3 DSCBs 


When enough available space has been found on a volume and the extent 
table created, identifier (format-1) and extension (format-3) DSCBs are built 
to describe the newly allocated data set or VSAM data space. Format-3 
DSCBs are required only when more than three extents are needed to fill the 
space request. For zero-quantity requests, only a format-1 DSCB is created; 
no extent entries are included, unless user labels were specified, making a 
user-label extent necessary. 


If the auto data set protection bit is set in the JECB (JFCBADSP), then the 
RACF indicator is set in the format-1 DSCB and a RACDEF macro 
instruction is issued to define the data set to RACE. 


Updating the Free Space (Format-5) and VTOC (Format-4) DSCBs 


To complete the allocation of a non-ISAM data set or VSAM data space, it is 
necessary to update the format-5 and format-4 DSCBs to define the new 
status of the volume. 


Updating Format-5 DSCBs: If an entire continuous area has been allocated to 
the data set or VSAM data space, the format-5 extent entry for that area is 
completely removed by moving forward by one location all subsequent 
format-S extent entries in that DSCB and in other format-5 DSCBs that may 
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Allocating a VIO Data Set 


be chained to it. If only part of an available area is allocated, the space is 
taken from the beginning of the area, and the track following the allocated 
area becomes the new lower boundary of the available area. 


If the space to be allocated begins at a specified track address or on a cylinder 
boundary, the allocation may be made from within an available extent. In that 
case the allocation must create a new extent in the format-S, and the spaces 
preceding and following the allocated space will become two areas identified 
in two format-5 extents. This causes all subsequent format-5S extents in that 
and any chained format-5 DSCBs to be moved back one location. 


Updating the VTOC (Format-4) DSCB: Two fields of the format-4 DSCB 
may be updated with each allocation. If a DSCB is added or removed (that is, 
if a free VTOC record (format-O DSCB) is written over a format-5), the 
count of the number of format-O0 DSCBs, which is in the DS4DSREC field of 
the format-4 DSCB, must be updated. This count is referred to as the hole 
count. The address of the last format-1. DSCB on the VTOC (the 
DS4HPCHR field of the format-4 DSCB) will have to be changed every time 
a new format-1 is added to the end of the VTOC. This address is referred to 
as the high-water mark and is used to terminate channel programs that search 
the VTOC. For VSAM data spaces, the VSAM catalog management updates 
the DS4AMTIM and DS4AMCAT fields of the format-4 DSCB. 


If a VIO data set is being allocated, virtual storage is obtained in the 
scheduler work area (SWA) for a virtual DSCB. The size of the extent to be 
allocated is calculated as the primary plus 15 times the secondary space 
requested and its beginning and ending address is entered in the virtual 
DSCB. A second extent, consisting of a single contiguous track will be 
allocated if the data set has user labels. 


Formatting Directories of Partitioned Data Sets 


Handling Error Conditions 


ISAM Data Set Allocation 
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If a partitioned data set is being allocated, the directory for the data set is 
formatted in the specified number of 256-byte blocks, each of which can 
contain from 3 to 21 data set member entries. For requests without 
directories, register 15 is loaded with a zero (successful) completion code and 
control is returned to the calling routine (that is, the scheduler or the utility 


program). 


When error conditions are encountered in the non-ISAM Allocate routine, 
they load register 8 with the error code and give control to the error-handling 
routine, which dequeues from the VTOC, frees work area, loads the error 
code in register 15 and returns to the calling routine. 


The ISAM data set allocation routine shares the initialization procedures with 
the non-ISAM data set allocation routine. For an ISAM data set, the 
procedures include establishing and initializing work areas, building control 
blocks, reading the format-4 DSCB and the first free space (format-5) DSCB 
into the work area, and searching the VTOC for a format-1 DSCB with the 
same name as the data set requesting allocation. 


Request Validation 


The ISAM allocation routine receives control from the allocate initialization 
procedures. When control is received the following checks are made: 


1. If a duplicate-name DSCB is indicated, the validity of the request must be 
verified. The duplicate-name request is valid (1) if it is the second or third 
of a sequence of two or three concatenated DD (data definition) 
statements that make up the ISAM allocation request and (2) if the same 
UCB is being used. 


2. If a multiple DD statement request is being processed (that is, two or three 
area types—prime, index, or overflow), the first request must indicate a 
DD name and the second and subsequent requests must be concatenated 
with the first (that is, must not have DD names). This information is 
checked in the DD statement entries in the TIOT. 


3. The space request must be in an integral number of cylinders or a number 
of tracks equivalent to an integral number of cylinders. (All space requests 
for a given data set must be specified in the same way, either as cylinders 
or absolute tracks.) 


4. Cylinder allocations must be specified as either SPACE = CONTIG or 
unspecified (no SPACE designation) on the DD statement. 


5. Only one of each type of area (index, prime, overflow) is allowed for a 
data set; they must appear in that order in the input stream. 


If any of these conditions is not met, the error exit is taken (see “Error 
Handling’). 


If this is the first DD statement in the allocation request, the request 
validation routines set up the TIOT entry for this and subsequent DD 
statement entries. 


Free Space (Format-5) DSCB Search 


Before searching the format-5 DSCBs on the VTOC, the free-space-search 
routine makes sure there is enough room on the VITOC to write four new 
DSCBs (format-1, format-2, format-3, and format-5). It is possible that one 
of each of these DSCBs can be created during a single allocation. 


The format-5 DSCB search routine searches all the format-5 DSCBs on 3 
given volume to find enough space to satisfy the request. 


The search involves comparing each format-5 DSCB extent in sequence with 
the requested quantity, which can be specified either as (1) an absolute track 
on a cylinder boundary and a number of tracks that ends on a cylinder 

boundary or (2) merely a number of contiguous or non-contiguous cylinders. 


For absolute track requests, each extent of the format-5 DSCB is examined to 
see if the absolute track is in the extent and whether the extent is big enough 
to fill the request. 


Searches for contiguous cylinders when looking for an extent, in the format-5 
DSCB, equal in size to the request. Until an extent of equal size is found, the 
extent that is larger, but closest in size to the requested space, is saved. As 
each subsequent larger extent is encountered, its size is compared to the size 
of the extent that has been saved. The result of the comparison is always to 
save the smallest extent (of all these larger extents) that will satisfy the 
request. 
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If, during the search of the format-5 blocks, an extent exactly equal in size to 
the space requested is found, that extent is allocated as the requested space 
and the search ends. Otherwise, the search terminates after all format-5 
DSCBs have been searched. If an extent larger than the request has not been 
found, an error exit is made. If a larger extent has been saved, the requested 
space is allocated from this extent. This method improves the allocation 
process in that space is taken from the smallest available extent that will fulfill 
the request, leaving larger extents intact to fill other requests. 


Requests specifying that the allocated cylinders need not be contiguous are 
handled in the following manner. As the search for space progresses, a 
five-entry pushdown list is built and maintained. This list contains the largest 
extents encountered in the search that are not large enough to contain the 
total request. If an extent larger than the requested space is encountered, the 
pushdown list is abandoned and the larger extent is saved. The search is then 
continued as described for the contiguous cylinder requests. 


The space requested is allocated either from the extent saved during the 
search, as in the case of a contiguous cylinder request, or from entries in the 
pushdown list. If the pushdown list is used, from two to five of the largest 
entries in the list are used as needed. 


If the request cannot be fulfilled by using any of the preceding methods, an 
error exit is taken. 


When enough space has been found to satisfy the request, an extent table is 
built containing at least one and no more than five extents in the form 
RTA1/RTA2. The extents are entered in ascending relative-track-address 
order. 


Building Format-1, Format-2, and Format-3 DSCBs 
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Three different methods are used to build and write the format-1, format-2, 
and format-3 DSCBs for ISAM data sets, depending on (1) whether format-1 
and format-2 DSCBs have been created during a previous pass on this volume 
and (2) whether an embedded index has been requested. 


Creating Format-1 DSCBs: If there are no format-1 DSCBs on the volume 
for this data set, this routine builds a new format-1 DSCB using the extent 
table and the JFCB. If an embedded index has been requested, control is 
passed to the embedded index processing routine, described below, before the 
format-1 extents have been added. This format-1 build routine also builds a 
format-3 DSCB if more than three extents are required to satisfy the space 
request. 


Figure 5 shows the conditions under which a format-2 DSCB is built. 


If the auto data set protection bit is set in the JFCB, a RACDEF 
TYPE=DEFINE macro instruction is issued for the first volume and a 
RACDEF TYPE=ADDVOL is issued for subsequent volumes, to define the 
data set to RACF. 


Format-1 DSCB Updating: When a format-1 DSCB for the data set being 
allocated already exists on the current volume, control is immediately passed 
to the format-1 DSCB updating routine. There is a format-1 DSCB in virtual 
storage when this routine receives control; the format-1 DSCB was read in by 
the Allocate initialization procedure or by the multivolume processing routine. 
Using the extent table as input, this routine adds extents to the identifier 
(format-1) DSCB or the extension (format-3) DSCB if there are extent 
locations left in these blocks. One format-3 DSCB is built if more than three 


extent locations are needed. The RTA1/RTA2 entries in the extent table are 
first converted to CCHH/CCHH format using the resident conversion 
routine. 


If an extension DSCB (format-3) is added and there is already an index 
DSCB (format-2) on the VTOC, a pointer to the new format-3 must be 


added to the format-2. The last DSCB to be written to the VTOC is the 
format-1. It is delayed because a pointer to a new format-2 and/or format-3 
may have to be added, and because the field in the format-1 DSCB that is a 
count of the number of extents in the data set must be updated. 


Embedded Index Processing: Except for the extents, the format-1 DSCB is 
created by the standard request processing routine, before this routine is 
entered. The extent table has at least one entry. 


This routine allocates space for the prime area and the index from the space 
available as indicated in the extent table. The space requested for the prime 
area is divided into two parts that are as nearly equal as cylinder boundary 
requirements permit. The entries in the extent table are then taken in order 
and assigned as prime extents as necessary to provide allocation for the first 
half of the prime area. The requested index area is then assigned from the 
next available track indicated in the extent table. Finally, the remaining space 
in the extent table is assigned to the other half of the prime area request. 


The Complete Request 


for the Data Set Current Request 
(Given in terms of (Given in terms of Format-2 
DD statement DD statement DSCB Needs 
parameters) parameters) to be Built Comments 
INDEX, PRIME, OVFLOW INDEX Yes 
PRIME or OVFLOW No A format-2 DSCB was built during the previous 
(on different volume (index) pass. Both the index area and the 
from INDEX) format-2 DSCB are on a different volume 
from the one currently being searched. If the 
same volume had been specified for both the 
INDEX request and the current request, a valid 
duplicate-name format-1 DSCB would have 
been encountered. 
INDEX, PRIME INDEX Yes 
PRIME (on different No A format-2 DSCB was built during the previous 
volume from INDEX) (index) pass. If the same volume had been 


specified, a valid duplicate-name format-1 
DSCB would have been encountered. 


PRIME, OVFLOW PRIME Yes For this type of request, an open executor 
module of the indexed sequential access 
method (ISAM) will construct an index 
in the overflow area. 


OVFLOW No A format-2 DSCB was built during previous 
(prime) pass. As previously described, a 
valid duplicate-name format-1 DSCB would 
have been encountered if the same volume 
had been specified. 


PRIME PRIME Yes An open executor module of the indexed 
sequential access method constructs the 
index area. 


Note: If the DD statement associated with a given ISAM data set has its ““‘type-of-space” parameter left blank, a request for 
PRIME is implied. 


Figure 5. Conditions under which format-2 DSCBs are built 
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Depending on the requirements of the request and the sizes of the extent 
entries, it is possible to form as many as seven DSCB extents (two for the 
index and five for the prime area) from the entries in the extent table. 


After the extents are created for the prime and the index areas, this routine 
adds as many as three extents to the incomplete format-1 DSCB. If more than 
three extents have been created, a format-3 DSCB is built to contain all those 
beyond the first three. As extents are placed in the format-1 (and possibly the 
format-3) DSCB, the index extents are entered first. 


The extent table entries are converted from a relative track address 
(RTA1/RTA2) form to a cylinder and head (CCHH/CCHH) form as they 
are entered in the DSCBs. A resident conversion routine is given control to do 
the conversion. 


Because an embedded index is always a first DD statement, it is necessary to 
construct an index DSCB (format-2). If a format-3 DSCB has been created, it 
is written to the VTOC. Then the format-2 DSCB is constructed, the address 
of the format-3 DSCB is placed in a pointer field, and the format-2 DSCB is 
then written to the VTOC. If a format-3 DSCB was not constructed, a 
format-2 DSCB is constructed and written out after the last extent entry is 
placed in the format-1 DSCB. 


Once the format-2 DSCB is written, its address is placed in a pointer field of 
the format-1 DSCB, and the format-1 DSCB is written. 


Updating the Free Space (Format-5) and VTOC (Format-4) DSCBs 
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When the format-1, format-2, and format-3 DSCBs have been written to the 
VTOC, the format-5 DSCBs must be updated to account for the space 
allocated and no longer available. The Allocate work area will still contain as 
many as five extent table entries. These are the extents that must be removed 
from the format-5 DSCBs, as they now represent extents allocated to the data 
set. Format-5 DSCBs are created and updated in the way previously 
described for non-ISAM data set allocation. 


The VTOC (format-4) DSCB must be modified to indicate changes in the 
number of free VTOC records (format-O0 DSCBs) in the VTOC. These 
changes result from adding format-1, format-2, and format-3 DSCBs and 
adding or deleting format-5 DSCBs. Allocation for the current DD statement 
entry in the TIOT is now complete. The ISAM allocate routine must 
determine whether (1) this is a multivolume request and (2) whether this is 
the last of a series of space-type requests (that is, prime, index, overflow). 


Multivolume requests are handled as described in “‘“Multivolume Processing.”’ 
If the current request is the last of the DD statement entries for this 
allocation, the virtual storage work area is released, the TIOT fields are 
restored to their ‘‘pre-ISAM allocate’ condition, and control is given to the 
job scheduler. If . e current request is not the last of the DD statement 
entries, indicators are set to provide the necessary information for the next 
entry to be processed, virtual-storage areas are released, and control is 
returned to the job scheduler. Processing of the last volume of a multivolume 
prime request is the same as described for a single-volume request. 


C 


C 


Multivolume Processing 


Error Handling 


VTOC Conversion 


Initial Conversion Processing 


This routine is entered to set up a loop in the ISAM allocate routine when an 
ISAM data set is to be allocated on more than one volume. 


The VTOC of the most recently processed volume is dequeued before control 
is passed to this routine from the format-4 DSCB updating routine. It is 
necessary, in order to maintain information in virtual storage, to perform 
several of the functions without returning control to the scheduler or the 
allocate initialization routine. These, then, are the same operations performed 
in the allocate initialization routine: enqueuing the VTOC of the new volume 
using a RESERVE macro instruction, reading the format-4 and first format-5 
DSCB into the allocate work area in virtual storage, and searching for a 
duplicate-name, format-1 DSCB (if found, it is read into virtual storage). 


Processing of the multivolume request then continues through the same steps 
as for a single-volume request (that is, an extent table is built and the 
format-1, format-2, and format-3 are built as required, the format-5 DSCBs 
are built and/or modified, and the format-4 DSCB is updated). 


When the ISAM data set allocation routine encounters errors, it sets an error 
code in register 5 and transfers control to the error handling routine. This 
routine dequeues the VTOC, frees the Allocate work area, loads the error 
code in register 15, and returns control to the scheduler. A cross-reference 
between messages issued and the error code and the modules that issue each 
code is in the “Diagnostic Aids”’ section. 


To provide a standard allocation procedure for the Disk Operating System 
(DOS) user and to provide the facility to reclaim VTOCs that have been 
invalidated as a result of permanent I/O errors and system failures during 
DADSM processing, the Allocate routines include a routine to convert and 
reclaim VTOCs. This reclamation and conversion involves rebuilding the 
format-5 and format-6 DSCBs and updating the format-4 DSCB. 


The VTOC Conversion routine receives control from the Allocate 
initialization routine and Extend routine when the DOS bit (bit 0 of the 
DS4VTOCI field) and/or the DIRF bit (bit 5 of the DS4VTOCTI field) is set 
in the VTOC (format-4) DSCB. When control is passed, register 7 contains a 
pointer to the UCB defining the volume to be converted and register 13 
points to the Allocate work area, which will contain the format-4 DSCB for 
the volume to be converted, along with an IOB, ECB, channel program, 
DEB/DCEB, and the address of the first format-5 DSCB on the volume. 


The VTOC Conversion routine first writes zeros over all shared extent 
(format-6) DSCBs on the volume. These DSCBs are deleted because they are 
invalid. If the DOS bit is on, a DOS allocation was made on the volume, and 
the DOS allocate routines do not keep track of (1) available space (2) 
shared-cylinder extents or (3) the high-water mark (the highest address of a 
format-1 DSCB, which appears in the DS4HPCHR field of the format-4 
DSCB). If the DIRF bit is on, an error occurred that may have invalidated the 
format-4, -5, or -6 DSCBs. 
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Split-Cylinder Processing 


After the format-6 DSCBs are deleted, a new format-5 DSCB is created and 
initialized to reflect the free space that was available when the volume was 
initialized, before any data sets were allocated. The highest track that can be 
allocated on the volume is calculated from the device characteristics table. 
The space for volume labels, IPL records if there are any on the volume, and 
the VTOC is subtracted from the new format-5 DSCB. 


Next, the VTOC Conversion routine reads sequentially through the VTOC 
and establishes the highest address used for a format-1 DSCB (DS4HPCHR 
field). The nonsplit-cylinder data set extents in the format-1 and format-3 
DSCBs are converted from CCHH/CCHH to RTA1/RTA2 form. Five 
extents are converted at a time and placed in the extent table. The converted 
extents are then subtracted from the free space. 


If there are split-cylinder data sets on the volume, each format-1 DSCB on 
the VTOC is read again, and the split-cylinder extents are identified and 
converted from CCHH/CCHH to RTA1/RTA2 format. As each 
split-cylinder data set is encountered, its extent is entered in a format-6 
DSCB, or, if the extent has already been entered in a format-6 DSCB, the 
count of number of data sets sharing the extent (the Z in the XX YYZ entry) 
is increased by one. A test is made to determine whether the split-cylinder 
data set extent in the extent table overlaps two format-6 extent entries. If 
there is an overlap, the two format-6 extent entries are merged into a single 
extent and their data set counts are added together. 


When all of the format-6 DSCBs have been built, chained, and written to the 
VTOC, they are read in again. The format-6 extents are entered, five at a 
time, in the extent table, then subtracted from the free space (format-5) 
DSCBs. When all the extents have been subtracted, they are again read into 
virtual storage. The format-6 extents are converted to final form (from 
RTA/number-of-cylinders/number-of-data-sets format to XX YYZ) and 
written back to the VTOC. 


Completion of Conversion Processing 


Conversion Limitations 
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When the split-cylinder processing is complete or when there are no 
split-cylinder data sets on the volume, the conversion processing is completed 
by converting the format-5 DSCBs to the final XX YYZ format. The new 


format-5 DSCBs are then written to the VTOC over the old format-5 DSCBs. 


This routine then turns off the DOS bit (bit 0 of the DS4VTOCI field) and 
turns on the ““DOS-converted”’ bit (bit 4 of the DS4VTOCI field) and/or the 
“DIRF reclaimed” bit (bit 6 of DS4VTOCTI), and writes the format-4 DSCB 
back to the VTOC. Control is then returned to the calling routine, Allocate 
initialization or Extend. 


The VTOC Conversion routines cannot build accurate format-5 and format-6 
DSCBs if: 


¢ A split-cylinder data set is located on cylinder zero. 
e A split-cylinder data set is located on the same cylinder as the VTOC. 


e A split-cylinder data set is located on the same cylinder as a 
non-split-cylinder data set. 


e Two data sets have overlapping extents. 


J 


C 


Extending Data Set and VSAM Data Space Allocations 


(Secondary Allocation) 


Extend Initialization 


The Extend routine dynamically allocates additional space to sequential data 
sets or VSAM data spaces that exceed the space allocated to them. Data sets 
with indexed sequential organization cannot be extended. Non-ISAM data 
sets (including the OS system catalog) can either be extended on the last 
volume a data set currently occupies, or they can be extended on a new 
volume. A VSAM data space and the VS2 master catalog can only be 
extended on the volume they currently occupy. The data set or VSAM data 
space can be extended by as many as five noncontiguous extents at a time, 
but no data set or VSAM data space is allowed to occupy more than 16 
extents on a single volume. 


The Extend routine uses the same methods as the Allocate routine when 
extending on a new volume: it takes space from the format-5 DSCBs, builds a 
list of extents to be allocated, builds a format-1 DSCB (and a format-3 DSCB 
if required), then updates the format-5 and format-4 DSCBs. 


When extending on the last volume that the data set or VSAM data space 
currently occupies (also referred to as the current volume), the Extend 
processing is the same as non-ISAM allocate processing, except that the 
format-1 DSCB is merely modified or a format-3 DSCB may be built if there 
isn’t one for the data set or VSAM data space on the VTOC. If there is a 
format-3 DSCB, it is modified. 


Although new split-cylinder data sets cannot be allocated under VS2, existing 
split-cylinder data sets can still be extended. Split-cylinder data sets are 
extended differently from other data sets. The space for the extension is 
allocated on new cylinders, and only the one extended data set can reside on 
these new cylinders. The cylinders containing the extension are not regarded 
as part of the original split-cylinder extent, even though they may be 
contiguous to the original extent. No entry is made in the format-6 DSCB for 
split-cylinder data set extensions. (VSAM data spaces cannot reside on split 
cylinders. ) 


Input to the Extend routine includes pointers to (1) the UCB and DEB of the 
data set or VSAM data space to be extended and (2) the O/C/EOV work 
area defined by the IECDSECT mapping macro, which contains the JFCB for 
the data set or VSAM data space to be extended and various control blocks 
for reading and writing the DSCBs on the VTOC. Register 13 contains a code 
to identify the caller (EOV, VS2 catalog management, or OS catalog 
management) and to indicate whether the extension is to be made on the 
current volume of the data set or VSAM data space or on a new volume. 


Extend processing begins by enqueuing the VTOC of the volume on which 
the data set or VSAM data space is to be extended. A RESERVE macro 
instruction is issued for the VTOC. The VTOC (format-4) DSCB is then read 
in, the DADSM interrupt recording facility (DIRF) indicator is set, and the 
format-4 DSCB may be written back to the VTOC, so that it can be 
determined if an interrupt that could invalidate the VTOC took place during 
Extend processing. 


Next, it must be determined whether (1) the data set or VSAM data space 
being extended is on a device on which the last allocation was made by the 
Disk Operating System (DOS), or (2) the VTOC was invalidated during 
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previous DADSM processing and must be reclaimed. In either case, the 
VTOC Conversion routine is given control to convert or reclaim the VTOC 
before the data set (data space) is extended. The Extend routine (1) gets a 
work area for saving registers and for use by the VTOC Conversion routine, 
(2) builds the control blocks needed by the I/O supervisor (the DEB/DCB, 
IOB, and ECB) in the work area, and (3) moves the format-4 DSCB into the 
work area. Control is passed to the VTOC Conversion routine and will be 
returned when the VTOC has been converted or reclaimed. If no errors are 
encountered during the conversion (indicated by a return code in register 8), 
Extend processing is continued. 


The Extend initialization routine determines whether the extension is to be 
allocated on the current volume or on a new volume by the code passed in 
register 13 at entry to this routine. If the extension is to be made on a new 
volume, it is necessary to search the identifier (format-1) DSCBs on the 
VTOC for a duplicate name, since a duplicate name would be invalid. No 
search is made when the extension is to be made on the current volume, but it 
is necessary to determine the preferred track (the first track following the end 
of the data set or VSAM data space being extended). 


The Extend initialization routine then converts requests in cylinders and 
average records (blocks) to tracks and accounts for a user label track, if user 
labels are requested. 


Building the Table of Extents to be Allocated 


The search for available space on the volume begins with the Extend routine 
attempting to allocate space contiguous to the extent of the data set (this is 
the preferred extent). If there is not enough contiguous space to fill the 
request, the routine builds a pushdown list of extents of as many as five 
entries representing non-contiguous areas that are smaller than, but closest in 
size to the requested space. If, while the pushdown list is being built, an 
extent equal to the request is found, that extent is allocated. If no extent in 
the format-5 DSCBs equals the request, the extension is allocated from the 
extent that is larger than and closest in size to the request. If no extent is 
found that is equal to or larger than the request, the extension is allocated 
from the pushdown list of extents. As few as two and as many as five of the 
extents in the pushdown list may be required to fill the request. The request is 
always filled using the fewest possible number of extents. The extent, or 
extents, required to fill the request are entered in the extent table. 


Building and/or Modifying Format-1 and Format-3 DSCBs 
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When the extent table has been successfully completed and contains an entry 
or entries representing the extents to be allocated, the format-1 and/or 
format-3 DSCBs must be built or modified to indicate the extension. 


If the extension is to be allocated on the current volume, the format-1 DSCB 
is read into the Extend work area. If the format-1 DSCB is full (that is, it has 
three extent entries), the format-3 DSCB is read into the work area, if a 
format-3 DSCB exists for the data set or VSAM data space. If no format-3 
DSCB exists for the data set or VSAM data space, one is built. 


Then, using the extent table entries, the format-1 and/or format-3 DSCBs are 
completed and written back to the VTOC; the format-3 is written first, then 
its address is entered in the format-1 DSCB, which is then written to the 
VTOC. 
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Updating the Format-5 DSCBs 


Updating the Format-4 DSCB 


For extensions on a new volume, a format-1 DSCB must be built using the 
information from the JFCB. If there are more than three extent entries in the 
extent table, a format-3 DSCB must also be built. When completed, the 
format-3 DSCB is written to the VTOC, its address put in the format-1 
DSCB, and the format-1 is written. 


When a new format-1 DSCB is created, a RACDEF TYPE=ADDVOL 
macro instruction is issued to add the new volume to the data set if the 
previous volume was RACF-defined. 


The first format-5 DSCB is read into the work area and, again using the 
extent table entries, format-5 DSCBs may be updated, added, or deleted. 


If an entire contiguous area has been allocated to the data set or VSAM data 
space during the Extend processing, the format-5 extent entry for that area is 
completely removed from the format-5 DSCB. The vacated extent in the 
format-5 DSCB is removed by moving forward by one location all subsequent 
format-5 extent entries in that DSCB and in other format-5 DSCBs that may 
be chained to it. If only part of an available area is allocated, the space is 
taken from the beginning of the area, and the track following the allocated 
area becomes the lower boundary of the available area. 


If the space to be allocated begins on a cylinder boundary, the allocation may 
be made from within an available area. In that case, the allocation must create 
a new extent entry in the format-5 DSCB, and the space preceding and 
following the allocated space becomes two areas identified in two format-5 
extents. This causes all subsequent format-5 extents in that and any chained 
format-5 DSCBs to be moved back one location. 


If a free VIOC record (format-O DSCB) must be written as a result of a 
format-5 DSCB being removed, the format-0 DSCB is written before the 
format-4 DSCB is modified. 


Since this is the end of Extend processing, this routine tests and resets the 
DIRF indicator in preparation for writing the format-4 back to the VTOC. 
This routine also handles error conditions encountered in the previous Extend 
processing (such as too many extents on the volume or not enough free 
records left on the VTOC) by setting an error return code and returning to 
the caller. 


If entered with no previous errors, this routine writes a format-O0 DSCB if 
requested by the format-5 updating routine. It then updates the format-0 
count and the highest extent used for a format-1 DSCB and writes the 
modified format-4 DSCB to the VTOC, dequeues the VTOC, and frees work 
areas. 


This routine then returns control to OS catalog management or VS2 catalog 
management using the XCTL macro. Control is returned to EOV using the 
IECRES LOAD macro, which results in a branch to EOV. 
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Deleting Data Sets and VSAM Data Spaces 


The Scratch routine is used to reverse the allocation process for all types of J 
data sets. When a data definition (DD) statement specifies that a data set or 

VSAM data space is to be deleted, the Scratch routine is entered from the 

scheduler at task termination. The Scratch routine is also given control as a 

result of the issuance of the SCRATCH macro instruction by a problem 

program, a data set utility program, or the catalog management routines. The 

extents in the data set’s or VSAM data space’s identifier (format-1) DSCB 

and extension (format-3) DSCB are added to a format-5 DSCB and a free 

VTOC record (format-O0 DSCB) is written over each of the data set’s or 

VSAM data space’s format-1, format-2, and format-3 DSCBs. Only ISAM ” 
data sets have index (format-2) DSCBs and only data sets or VSAM data 
spaces with more than three extents on a volume have format-3 DSCBs. 


Extents allocated to split-cylinder data sets are not released until all of the = 
data sets sharing a given cylinder extent are deleted. 


Scratch Initialization, Volume Verification, and Volume Mounting 
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When the Scratch routine is entered, register 0 contains either a pointer to a 

unit control block or all zeros. Register 1 contains a pointer to a parameter list 

that (1) indicates whether the purge date is to be overridden, (2) points to the 

data set name of the data set or VSAM data space to be deleted, and (3) 

points to a list of one or more volume entries, one for each volume on which 

the data set resides. Requests to scratch a VSAM data space are made one 

volume at a time; the parameter list passed by catalog management contains 

only one entry in the volume list. The volume list consists of a 2-byte count of | 
the number of volumes in the data set or VSAM data space to be scratched J 
and a 12-byte entry for each volume of the data set or VSAM data space. The 

12-byte entry is used to specify the device code and the volume serial 

number. Only one data set or VSAM data space can be deleted with each 

request. 


When a UCB pointer is passed in register 0, the Scratch routine verifies that 

the device represented by the UCB is allocated to the task and that it is 

on-line and, in case a volume containing the data set or VSAM data space is 

not mounted, that the volume currently mounted is eligible for demounting 

(permanently mounted, reserved, and shared volumes cannot be demounted). 

When (1) no UCB pointer is passed or (2) the device represented by the 

UCB address passed is not eligible for demounting, the Scratch routine 

searches the TIOT DD entries (via the DSAB chain) for the address of the 

UCB with the volume serial number that matches the volume serial number 

passed in the volume list (by way of the Scratch parameter list). When a : 
matching volume serial number is found, the UCB is tested (1) to verify that 
the device it represents is on-line and (2) to determine whether the volume it 
represents is eligible for demounting. This routine also enqueues on the TIOT 
(resource name is SYSZTIOT) and the data set name (resource name is 
SYSDSN) to ensure that the data set is not open. 


At the conclusion of initialization, after enqueuing on the TIOT and data set 

name, Scratch determines if the next volume in the volume list is mounted. If 

the volume containing the data set or VSAM data space to be scratched is not 

mounted, a mounted volume can be demounted. If the volume is not an MSS 

virtual volume, a mount message is issued, to which the operator can respond , 
either by replying ‘‘U’’ and mounting the volume, or by replying ‘“‘M’’. If the J 
volume is an MSS virtual volume and is on a JES-3-managed unit, the 

IEFSSREQ macro is issued to JES3 for volume control prior to issuing the 
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mount request to MSS. If the volume is an MSS virtual volume, a mount 
request is issued to MSS via SVC 126 and no message is issued to the 
operator unless there is an error. If he mounts the volume, its label is read and 
the volume serial number is verified. SMF information about the volume 
being demounted will be recorded (1) for systems with the SMF feature and 
(2) if the “MONITOR SPACE” command has been issued by the operator. If 
the operator replies ‘‘M’’, the next volume in the volume list is processed. 


Upon verification that the volume containing the data set to be scratched is 
mounted, or after having mounted the required volume, the Scratch routine 
builds the control blocks required by the I/O supervisor to read from and 
write to the VTOC. Next, the VTOC is enqueued using a RESERVE macro 
instruction with the “‘set-must-complete”’ option, and the addresses of the 
format-4 and the first format-5 DSCBs on the VTOC are calculated. 


When a data set residing on more than one volume is to be deleted, the 
Scratch routine maintains control until all volumes have been processed. It is 
possible, however, that, because of a permanent I/O error or because a 
volume is mounted, the data set may not be deleted from all volumes. The 
success or failure (and reason for failure) of the scratch processing is 
communicated in the last byte of the volume list entry (the scratch status 
code). Success or failure is also indicated by the return code passed in register 
15 when control is returned to the caller. 


DSCB Deletion and Split-Cylinder Processing 


When it has been verified that the volume containing the data set or VSAM 
data space to be deleted is mounted, the Scratch routine reads in the format-4 
DSCB and the format-1 DSCB for the data set or VSAM data space. If the 
data set is password-protected, control is transferred to the SECLOADA 
module of the Open/EOV password-protection function. SECLOADA 
verifies the password and returns control. If the data set is RACF-indicated, a 
RACHECK macro instruction is issued to check the user’s authority to delete 
the data set. If he is authorized, a RACDEF TYPE=DELETE macro 
instruction is issued to undefine the data set to RACF; the macro instruction 
is bypassed for RACF-defined data sets if the JSCBPASS is set to 1 and the 
SCRATCH parameter list, second byte, second bit, is set to 1. If the data set 
is RACF-defined, password checking is bypassed. 


Next, the purge date for the data set or VSAM data space is checked, if it is 
not overridden. The format-4 DSCB is processed for DIRF. The extents of 
the data set’s or VSAM data space’s format-1 DSCB (and format-3 DSCBs, 
if there are any) are entered in the extent table (this table can contain as 
many as 16 extent entries); when the extents have been converted from 
CCHH/CCHH to RTA1/RTA2 and entered in the table, a format-O DSCB 
is written over the format-1 and format-3 DSCBs. 


Note: Format-2 DSCBs for ISAM data sets are also written over with 
format-O DSCBs during this processing. 


When the format-1, ISAM format-2, and format-3 DSCBs have been deleted, 
this routine reads in either the format-6 DSCB if a split-cylinder data set is 
being deleted, or the first format-5 DSCB if no shared extents are involved. 


Whether split-cylinder data sets are involved or not, the Scratch routine now 
sorts the extent table into ascending relative track address sequence. 
However, if the data set is on split cylinders, each extent in the format-6 
DSCB is compared with the extent table entries until the appropriate format-6 
extent is found. When found, the number of data sets sharing the extent (the 
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Z of XX YYZ) is decreased by one. If the number of data sets goes to zero, 
the extent is removed from the format-6 and each subsequent format-6 DSCB 
extent must be moved up one location to close the vacated space on the 
VTOC. If the number of users does not go to zero, the format-6 DSCB is 
written back to the VTOC with only the number of users changed. But the 
deleted data set’s extent must be removed from the extent table, because no 
space is made available until all data sets have been deleted from the shared 
extent. At the conclusion of Split cylinder processing, the first format-5 
DSCB is read into virtual storage. 


Updating the Free Space on the Volume (Format-5 DSCB) and the VTOC 


(Format-4) DSCB 


The format-5 DSCBs are updated by merging the extent table entries with the 
existing format-5 DSCBs in sequence. If the deleted data set shares cylinders 
with another data set and no space is released, the merge is bypassed. As the 
format-5 DSCBs are read, their extents are converted from XX YYZ to 
RTA1/RTA2; before the updated format-5 DSCBs are written back to the 
VTOC, the extent entries are again converted from RTA1/RTA2 to XXYYZ 
format. 


When the format-5 DSCBs have been updated, the number of free VTOC 
records (format-O DSCBs) now on the VTOC must be updated if the number 
has changed. The format-4 DSCB is then written back to the VTOC and the 
VTOC is dequeued. If the data set is on multiple volumes, the Scratch routine 
can now begin to process the next volume. If processing is complete, the 
TIOT and data set name are dequeued, work areas are freed, the return code 
is loaded in register 15, and control is returned to the caller. If the system has 
the SMF feature and data set activity records are requested, a type-17 SMF 
record may be written before control is returned. 


Freeing Unused Space (Partial Release) 
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The Partial Release routine deletes extents (area identifications) from the 
format-1 and/or format-3 DSCBs of a data set, beginning at a specified track 
or cylinder and continuing to the end of the data set’s allocated extent. For 
example, suppose a data set was allocated three extents at the beginning of a 
job. During the job, a program writes records up to the second track in the 
third extent of the data set. If the job specified release of the unused space in 
the data set, the Close routine of O/C/EOV would request the Partial 
Release routine to release the tracks following the last used track of the third 
extent. If either the original request is a request in cylinders or the ROUND 
option was specified, the area released begins at the first cylinder boundary 
following the last track written. The tracks released are returned to available 
space for future allocation, as is done by the Scratch routine. 


Note: Partial Release processing of ISAM data sets is not possible because 
information in overflow areas may be deleted. 


The Partial Release routine is entered from the Reposition I/O module of 
Checkpoint/Restart and from Close processing. 


When the Partial Release routine is entered, a work area pointed to by 
register 4 will contain (1) the format-1 DSCB and JFCB for the data set, and 
(2) the control blocks required to read from and write to the VTOC. (This 
work area is referred to as the O/C/EOV work area and defined by the 
IECDSECT mapping macro.) Register 2 contains a pointer to the user’s DCB 
and register 10 contains a pointer to the UCB. 
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Updating Format-1 and Format-3 DSCBs 


When entered, the Partial Release routine first gets a work area for reading in 
the format-4 (VTOC) DSCB and format-5 (free space) DSCB, enqueues the 
VTOC, and reads in the format-4 DSCB using the VTOC address in the unit 
control block (UCB). After DIRF processing, this routine determines whether 
the last track written to on the data set (obtained from the user’s DCB) is in 
an extent of the format-1 DSCB or an extent of the format-3 DSCB. 


If this extent is in the format-1 DSCB, its location is calculated. The address 
of the first track to be released is calculated; the identification of the released 
extent in CCHH/CCHH is converted to RTA1/RTA2 and entered in the 
extent table. Any subsequent extents in the format-1 DSCB are also 
converted and entered in the extent table, and their identifications are 
removed from the format-1 DSCB. Next, it is determined whether there is a 
format-3 DSCB on the VTOC for this data set. If so, it is read in, its extents 
are converted and entered in the extent table, and a free VTOC record 
(format-0 DSCB) is written over the format-3 DSCB on the VTOC. 


If the last track to be written on the data set is contained in the format-3 
DSCB, the format-3 DSCB is read in and, again, the location of the first track 
to be released is calculated. The extents following this track are converted to 
RTA1/RTA2 format and entered in the extent table. Then the extents are 
written over with zeros and the format-3 DSCB is written back to the VTOC. 


When SMF information is required, the task’s TCB contains a pointer to the 
timer control table (TCT), and the CVT contains a pointer to the system 
management control area (SMCA). If the fourth bit of the SMCAOPT is set 
to one, data set information is required. Using the extent table, this routine 
adds the number of released extents and the amount of space released into 
the appropriate fields of the data set entry in the TCT I/O table of SMF (the 
Close and EOV routines use this information when they construct a type-14 
or type-15 SMF record). 


This routine then writes back the format-1 DSCB whether or not any space 
has been released. If space is being released this routine sorts the extent table 
into ascending RTA sequence, and reads in the first format-5 DSCB. 


Updating the Format-5 (Free Space) and Format-4 (VTOC) DSCBs 


When the format-1 and format-3 DSCB updating is complete, this routine 
merges the extent table entries with converted format-5 extents, reconverts 
the merged extents from RTA1/RTA2 format to XX YYZ, and writes the 
format-5 DSCBs back to the VTOC. 


Format-4 DSCB updating involves first processing for DIRF, then accounting 
for the number of new free VTOC records (format-O DSCBs) on the VTOC 
and writing the format-4 DSCB back to the VTOC. 


At the conclusion of Partial Release processing the VTOC is dequeued and 
the Partial Release work area is freed. 


A completion code is returned to the caller in register 1. 
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The VTOC-Related Services Routines 


Renaming Data Sets 
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Data sets on direct-access volumes are renamed by using the RENAME 
macro instruction (SVC 30), which invokes the Rename routine. VSAM can 
use the Rename routine if a data space is established for only one VSAM data 
set (UNIQUE). The format-1 DSCB of the data set or data space to be 
renamed is read in (after it is verified that the new name is not already on the 
volume), the 44-byte name is changed, and the format-1 DSCB is written 
back to the VTOC. Only a single data set may be renamed by each issuance 
of the RENAME macro; however, multivolume data sets may be renamed, if 
either all volumes are mounted simultaneously, or one of the mounted 
volumes can be demounted (physically and logically). 


When the Rename routine is entered, register 0 must contain either a pointer 
to a unit control block or all zeros (no UCB address specified). Register 1 
contains the address of a parameter list that contains pointers to (1) the name 
of the data set to be renamed, (2) the new name of the data set, and (3) a 
volume list. The volume list contains a 2-byte count of the number of volumes 
in the data set to be renamed and a 12-byte entry for each volume of the data 
set. The 12-byte entry is used to specify the device code and the volume serial 
number. 


The Rename routine then goes through the same initialization and volume 
verification logic and then, if needed, the same volume demounting/ mounting 
routine that are described previously for the Scratch routine under “Scratch 
Initialization, Volume Verification, and Volume Mounting.” Upon 
verification that a volume to be renamed is mounted or after having mounted 
the required volume, the Rename routine builds the control blocks and 
channel programs required by IOS to read from and write to the VTOC. 


When a data set residing on more than one volume is to be renamed, the 
Rename routine maintains control until all volumes have been processed. It is 
possible, however, that, because of a permanent I/O error or because a 
volume cannot be mounted, the data set may not be renamed on all volumes. 
The success or failure (and reason for failure) of the Rename processing is 
communicated in the last byte of the volume list entry (the Rename status 
code). Success or failure is also indicated by the completion code passed in 
register 15 when control is returned to the caller. 


When a volume containing a data set to be renamed is mounted, the VTOC is 
searched for a data set name that is the same as the new name in the Rename 
parameter list (a duplicate name is not allowed on the VTOC). Next, the 
VTOC is enqueued, and the identifier (format-1) DSCB of the data set to be 
renamed is read in. If the data set to be renamed is RACF-indicated, 
password checking is bypassed and a RACHECK macro instruction is issued 
to check authorization to rename, followed by a “RACDEF NEWNAME' to 
change the name in RACF. The RACDEF NEWNAME is bypassed for 
RACF-defined data sets when the caller is authorized and the JSCBPASS bit 
as well as the RENAME parameter list, second byte, second bit, is set to 1. If 
the data set is password protected, an exit is taken to the SECLOADA 
module of the Open/EOV password-protection function, which verifies the 
password by polling the operator. (OS/VS2 System Programming Library: 
Data Management describes password protection procedures.) When the 
password has been verified, control is returned to Rename; the name in the 
format-1 DSCB is changed, the format-1 DSCB is written back to the VTOC, 
and the VTOC is dequeued. If there are additional volumes that contain the 


data set to be renamed, processing is repeated. If the system includes SMF 
and data set activity records are requested, type-18 records will be written 
when processing is completed. The TIOT and data set name are dequeued, 
the work areas are freed, the completion code is loaded, and control is 
returned to the calling routine. 


Reading a DSCB from the VTOC (Obtain) 


The Obtain routine is entered when the OBTAIN macro instruction (SVC 27) 
is issued. The function of the Obtain routine is to read a DSCB into a work 
area provided by the caller. 


The caller has two options when he issues an OBTAIN macro: (1) he may 
specify the data set name and receive the data portion (last 96 bytes) of the 
format-1 or format-4 DSCB for that data set or data space and the absolute 
address of the DSCB (search option), or (2) he may specify the absolute 
track (CCHHR) of the DSCB he wants (seek option) and receive the 
complete DSCB (140 bytes). Note that for VSAM and VIO data sets an 
absolute track address of zero is returned because no DSCB exists. Only one 
DSCB can be obtained with each issuance of the OBTAIN macro instruction. 
The volume on which the DSCB resides must be mounted. TSO uses the 
Obtain routine to get information about a VSAM data set or index. However, 
only the “search” option is available. The data set name for a suballocated 
VSAM data set appears only in the VS2 master catalog or ina VSAM user 
catalog, not in the VTOC. The data set name of a unique VSAM data set 
does appear in the VTOC. Therefore, to determine the extents of a 
suballocated VSAM data set, the Obtain routine must issue a VSAM 
LOCATE command to retrieve physical extent information from the VSAM 
catalog. 


When the Obtain routine receives control, register 1 points to a parameter list 
that contains (1) a code specifying the search or seek option, (2) the address 
of a data set name (search option) or a pointer to the absolute track address 
(CCHHR) of the DSCB he wants (seek option), (3) the address of the 
volume serial number of the volume on which the DSCB resides, and (4) the 
address of a 140-byte work area, into which the DSCB and its absolute track 
address are read. 


Obtain processing begins with getting a work area used for control blocks and 
channel programs. If the caller is in problem state, but not key 0-7, Obtain 
branches to the resident validity-checking routine to verify that the caller’s 
work area has a protection key that matches the key in the current task’s 
TCB. Next, a search of the UCBs is conducted to find the UCB with the 
volume serial number that matches the volume serial number passed in the 
Obtain parameter list. 


If the search option has been specified, the 96-byte data portion of the 
format-1 DSCB (or format-4 DSCB if the data set name is 44 characters of 
X’04’) of the named data set is read into the Obtain work area, along with its 
absolute track address (CCHHR). This information is moved to the caller’s 
work area. If the Obtain request is for a suballocated VSAM data set, the 
search of the VTOC will fail because a VSAM data set name appears only in 
a VSAM catalog. The VSAM data space name, which may be the name of a 
unique VSAM data set, appears in the format-1 DSCB. Before taking an error 
exit (no data set name found), the Obtain routine checks the format-4 DSCB 
to determine whether there are VSAM data sets on the volume. If so, the 
Obtain routine issues a VSAM LOCATE command to get extent information 
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from the VS2 master catalog. This information is moved into the caller’s work 
area. 


If the seek option is in effect, the format-4 (VTOC) DSCB is read to verify 
that the absolute track address of the DSCB specified is in the VTOC extent. 
Next the complete DSCB is read and moved to the caller’s work area. 


Obtain processing is now complete. The Obtain work area is freed, the 
completion code is loaded in register 15, and control is returned to the caller. 


VIO Data Sets: No DSCB exists for VIO data sets. However, a virtual DSCB 
resides in the scheduler work area. The Obtain routine finds this virtual DSCB 
by searching the DSAB chain for a TIOT DD entry containing a virtual UCB 
whose virtual DSCB contains the data set name of the data set for which the 
OBTAIN macro was issued. When located, the virtual DSCB is moved to the 
caller’s work area. Only the search option of OBTAIN can be issued for VIO 
data sets. 


Obtaining Information About Free Space on a Volume (LSPACE) 


44 OS/VS2 DADSM Logic 


The LSPACE routine accumulates information about free space on a volume. 
This information is used by the System Management Facility and the routines 
that issue demount messages (when the “MONITOR SPACE” command has 
been issued by the operator). LSPACE is invoked by the issuance of an 

SVC 78. 


At entry to LSPACE, register 0 points to a UCB and register 1 indicates the 
functions to be performed, as follows: 


e If the three low-order bytes of the register have a nonzero value, space 
information is to be obtained for a routine that issues demount messages 
when the “MONITOR SPACE” command has been issued by the 
operator. The value is a pointer to a 30-byte message area that will receive 
the space information. 


e If the high-order byte of the register is 0, no space information is required 
for SMF. 


e If bit one of the register is set to 1, space information may be required for 
SMF, depending upon other conditions to be tested. 


e If bit zero of the register is set to 1, space information is required for SMF. 


The LSPACE routine checks the UCB passed to ensure that it identifies a 
direct-access device and checks the message area to be sure it is in the user’s 
area (if the user is in program state). 


Next, a work area is obtained, the I/O supervisor control blocks are built in 
the work area, and a channel program for reading the format-4 and first 
format-5 DSCBs is relocated to the work area. 


When the channel program and the control blocks are established, the VTOC 
is enqueued using a RESERVE macro instruction, and the channel program is 
executed to read in the format-4 and first format-5 DSCB. The channel 
program is modified to read in the subsequent format-5 DSCBs on the 
volume. 


The extent, cylinder, and track information is accumulated from the format-5 
DSCBs. If SMF information is required, the volume label is read in and a 
type-19 record is constructed and written to the SMF data set. 


If the ‘MONITOR SPACE” command is in effect, the accumulated extent, 
cylinder, and track information is converted to EBCDIC and moved to the 
30-byte message area provided by the caller. The message looks like this: 


SPACE=CCCC,TITT,AAAA/Scccc, ttt 


Where: 

ccccC = Total number of free cylinders 

TITT = Total number of free tracks 

AAAA = Total number of free extents 

cccc,tttt |= Largest contiguous free area in cylinders and tracks 


LSPACE processing is now completed by dequeuing the VTOC, freeing the 
LSPACE work area, loading the completion code in register 15 and the 
message address in register 1, and returning control to the caller. 


Processing PASSWORD Data Set Requests 


The Protect routine (SVC 98) is used to add, replace, delete, or list entries in 
the system PASSWORD data set. 


Note: Another protection scheme is used for VSAM data spaces. See 
OS/VS2 Virtual Storage Access Method (VSAM) Logic for a description of 
the protection provided for VSAM data spaces. 


Validity Checking 


Input to the Protect routine is the address of a parameter list. The size and 
contents of the parameter list depend on whether a Protect routine is going to 
add, replace, delete, or list an entry in the PASSWORD data set. See 
OS/VS2 System Programming Library: Data Management, for an 
explanation of the parameter lists and the functions of the PROTECT macro 
instruction. 


If (1) the parameter list is incomplete, (2) the password name specified in the 
parameter list is not valid, or (3) there is no PASSWORD data set, an error 
code is set. Also, if a buffer address is specified in the parameter list, the 
buffer address is tested by the validity-checking routine that resides in the 
system nucleus. The routine determines whether the buffer location has a 
protection key equal to the protection key in the task control block (TCB) of 
the routine that issued the PROTECT macro instruction. 


If the parameter list information is valid, the Protect routine enqueues the 
system-residence volume, which contains the PASSWORD data set. An 
OBTAIN macro instruction is issued to read the format-1 DSCB for the 
PASSWORD data set. Next the control blocks needed by IOS are built, and a 
channel program to search and update the PASSWORD data set is initialized. 


Processing the PASSWORD Data Set 
The request is processed by one of the following four routines: 


e The add routine—if the requested function is to add a record to the 
PASSWORD data set 


e The replace routine—if the requested function is to replace a record in the 
PASSWORD data set 


e The delete routine—if the requested function is to delete a record in the 
PASSWORD data set 
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Updating the Format-1 DSCBs 


e The list routine—if the requested function is to list a record in the 
PASSWORD data set 


If the function requested is to add an entry to the end of the PASSWORD 
data set, the DSILSTAR field (address of the last block written to the data 
set) of the format-1 DSCB for the PASSWORD data set must be updated and 
written back to the VTOC. 


When a data set has been newly protected, it is necessary to change the 
protection status of the data set. This is done by reading in the format-1 
DSCB, modifying the password protection bits of the DS1DSIND field, and 
writing the format-1 DSCB back to the VTOC. (The VTOC is enqueued 
during the updating.) The volume that contains the data set is located either 
(1) by issuing a LOCATE macro instruction if the data set is cataloged or (2) 
using a user-supplied list of volume serial numbers that is provided as part of 
the input. The UCBs are searched for a volume serial number that matches 
the number in the volume list. If the newly protected data set resides on 
multiple volumes, the format-1 DSCB is modified on each volume. When all 
volumes have been processed, the work areas are freed, a completion code is 
loaded into register 15 (see OS/VS2 System Programming Library: Data 
Management), and control is returned to the calling routine. 


How to Use the Method of Operation Diagrams 


Overview Diagrams 


Diagram 1 is an index to help you find the diagrams or group of diagrams that 
you’re interested in by name. 


Diagrams 2, 3, 7, 11, 14, 17, and 21 relate input and output (on the left and 
right, respectively, of each diagram), to the process steps in the center block 
of the overview diagram. The numbers on the process blocks of these 
diagrams are the diagram numbers of subordinate diagrams. The process 
blocks in the overview diagrams summarize the processing that is described in 
the subordinate (bottom-level) diagrams. The overview diagrams also contain 
a legend. 


Reading the Bottom-level Diagrams 
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These diagrams relate processing steps to the input and output they use. The 
input—control blocks, register contents, and records read from I/O 
devices—is on the left. Input is what the processing steps use. The processing 
steps in the center block describe the function of a routine or series of 
routines in the source code. Each processing step is preceded by a number 
that is keyed to the extended description on the facing page. The processing 
block also shows flow of control using the on-page and off-page connectors 
described in the legend. The output of the processing steps consists of 
modified control blocks, register contents, and records written to I/O devices. 
The nature of the use of the input—for reference to virtual storage moved 
from one location to another, or records read into virtual storage from I/O 
devices—is determined from the type of data arrow used. The arrows and 
their meanings are described in the legend. Similarly, control block 
modification, register settings, and records written to I/O devices in the 
output block as determined from the arrow type associated with the output. 


C 


Reading the Extended Description 


The extended descriptions provide more detail about a processing step. They 
also identify a processing step with the CSECTs and labels within these 
CSECTs where you can find the source code. Each processing step has a 
number that corresponds with a number in the extended description. 


The bold characters preceding the paragraphs of the extended 
description—for example, IGG0325A—are the CSECT/object module 
names (and microfiche names) of the source code modules in which you can 
find the implementation of the functions. The characters in brackets—for 
example, [CONVNEXT|—following the paragraphs of the extended 
description are labels in the source code. 


Work Areas in the Input and Output 


The DADSM routines use work areas for reading from and writing to the 
VTOC and for communication among control sections. The conventions used 
in obtaining work areas and the work area chaining procedure is discussed in 
“DADSM Data Area Chaining.” In the diagrams that follow, the base prefix 
of these work areas and the audit trail used by the recovery routines are not 
shown; only the extended prefix and WTG table are shown. 


The contents of these work area prefixes, the WTG table, and the audit trail 
are included in: 


e OS/VS2 Data Areas 


Allocate work area 

Extend work area 
O/C/EOV main work area 
Partial Release work area 
Scratch work area 


e« the “Data Areas’’ section of this book 


LSPACE work area 

Obtain work area 

Protect work area 

Rename work area 

VTOC Conversion work area 
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Diagram 01. DADSM Overview 
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Diagram 02. Allocate Overview 


Diagram 11 
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Diagram 03. Non-ISAM Data Set or VSAM Data Space 
Allocation—Overview 


Entered via 
SVC32 from 
scheduler, 
utilities, or 
VSAM 


JFCB or partial DSCB 


Diagram 04 Diagram 05 Diagram 06 
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Diagram 04. Allocate Initialization—Duplicate-Name Search 
and Non-ISAM Allocate Request Conversion 
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Extended Description for Diagram 04 


This function is entered from the SVC SLIH via SVC 
32 (Allocate) issued by the scheduler, utilities, and 
VSAM components of the system control program. 


IGC0003B 


1 Gets work area used by all Allocate routines. 
[BEGINA] 


2a Builds DEB/DCB, IOB, and FCB in the Allocate work 
area. Tests JECFLGSI1 field for VIO data set 
indicator. If a VIO data set is being allocated, transfers 
control to IGG0325I to build virtual DSCB. 
[MAINUCB] 


2b If a VIO data set is to be allocated, an exit is taken to 
the VIO allocation routine, IGG03251 (see Diagram 
06). 


3 Tests for RPS feature. If present, gets 128-byte RPS 
work area and copies the appendage vector table 
(AVT) into it. Loads module IGGO19EK and enters its 
address in the AVT. Modifies the DEB in the Allocate 
work area to point to the RPS AVT. [RPSTEST] 


IGG0325A 


4a Converts VTOC address from TTR to MBBCCHHR 
using the resident conversion routine (IECPCNVT). 
[BEGINA] 


Relocates a channel program to the Allocate work 
area to read the F4 and first F5 DSCB into virtual 
storage and to search the VTOC for a duplicate name 
F1 DSCB. Enqueues the VTOC using a RESERVE 
macro instruction. [MOVECHPG] 


4b Reads the F4 and first FS DSCB and searches all F1 
DSCBs on the VTOC for a duplicate name (valid only 
for ISAM data sets). [EXECUTET] 


5a Processes for DADSM interrupt-recording facility 
(DIRF): sets/resets the DIRF bit. If no previous 
interrupt has occurred, the F4 is written back to the 
VTOC with the DIRF bit set. If a previous interrupt 
has occurred, the F4 is not written back. When a DOS 
volume or a volume on which the DIRF bit was set 
(system failed during VTOC updating, a permanent 
I/O error occurred during the reading or writing of a 
DSCB, or overlapping extents were found in a DSCB) 
is encountered, control is transferred to the VTOC 
conversion routine to convert the VTOC to standard 
format or to reclaim a VTOC that was invalidated by 
system failure or permanent I/O error during 


oa > 


C 


DADSM processing. The DOS and DIRF bits are bits 
0 and 5 of the DS4VTOCI field of the F4 DSCB. 
[DIRFTEST] 


5b If the DOS or DIRF bit is on in the DS4VTOCI field 
of the F4 DSCB, the VTOC must be converted or 
reclaimed before an allocation can be made. The 
VTOC Conversion routine is given control to convert 
or reclaim the VTOC. 


5c When a duplicate name F1 DSCB is found on the 
VTOC, this section, verifies that an ISAM data set is 
being allocated. For ISAM data sets, the data portion 
of the duplicate name DSCB is relocated in the 
Allocate work area and control is transferred to the 
ISAM Allocate routine (Diagram 08). [SAMENAME] 


1GG0325B 


6 Determines what kind of allocation request is being 
made: in cylinders, in tracks, or in average records. 
For zero-quantity requests specifying user labels, 
transfers control to IGG0325K. For zero-quantity 
requests, transfers control to IGG0325E. 
[(CYLTRKRC] 


Converts cylinder requests to tracks. [MULT] 
Converts average record requests to tracks. [NOCAL] 


Calculates the space required for BPAM directories 
and converts the quantity to tracks. [DIRCAL] 


7 For absolute-track requests, transfers control to 
1GG0325C. [CLEANUP] 


For all allocation requests in tracks (except 
absolute-track requests), cylinders, or average records, 
transfers control to IGGO325D, except when user 
labels are specified (goes to IGG0325K). [REGULAR] 


RI points to a fullword containing a UCB address. If, 
however, a VIO data set is being allocated, R1 points 
to a fullword that contains a device code. 


If the high order bit of RO is zero, Allocate was called 
by the task scheduler or VSAM and RO contains the 
address of a JFCB. If the high-order byte of RO is set 
to one, Allocate was called by a utility and RO points 
to a partial DSCB. 


C 


If an ISAM data set is being allocated, R2 points toa 


list of DSAB addresses. The contents of the list 
depend on the number of DD statements associated 
with the data set being allocated: 


Word 1—address of DSAB associated with the DD 
statement being allocated 


Word 2—address of DSAB that represents the first 
DD statement associated with the data set (the DD 
statement containing the DD name) 


Word 3—address of the DSAB that represents the 
second DD statement (zero if there is only one DD 
statement) 


Word 4—address of the DSAB that represents the 
third DD statement (zero if there are only two DD 
statements and absent if there is only one DD 
statement) 


Word 5—zero if there are three DD statements, 
otherwise absent. 
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Diagram 05. Non-ISAM Allocation—Free Space Search and 
F1/ F3 DSCB Building 
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Extended Description for Diagram 05 


This function is entered from the Allocate 
Initialization function (Diagram 04) when work areas 
and I/O control blocks have been established and the 
type of allocation has been determined: step | is 
entered if a user label treck is required; step 3 is 
entered if the allocation is specified at a specific track 
(absolute track allocation); step 4 is entered fora 
normal request; or step 6 is entered if a zero-quantity 
request is being processed. 


1GG0325K 


1 


Converts first F5 DSCB extents from XX YYZ format 
to RTA and the number of tracks. Finds smallest 
extent that has the number of tracks needed. [START] 


Determines request type (in cylinders, tracks, or 
average records) and makes an entry in the extent 
table for the user-label track. Modifies the F5 extent 
from which the user-label track was taken. 
[TESTYPE] 


Transfers control according to request type: 
zero-quantity request (to IGG0325E), or regular 
cylinder/track request (IGG0325D). [EXIT] 


IGG0325C 


3 


Searches the F5 DSCBs until the extent containing the 
absolute track requested is found; when found, 
determines if there is enough available space at the 
specified location to fill the request. [RESET] 


Moves the F5 extent that fills the request to the extent 
table. Transfers control to IGG0325E. [INSERTLO] 


IGG0325D 


4 


Converts extents of the first FS DSCB from XX YYZ 
to RTA and the number of tracks format, when not 
entered from the user-label routine (IGG0325K). 
Determines request option: CONTIG, MXIG, ALX, 
or no option specified. [START] 


Searches F5 DSCBs and builds entries for the extent 
table according to the option specified: 


« CONTIG request [CONTIG] 
¢ No option specified [BLANK] 
¢ MXIG or ALX [ALX] 


Builds a pushdown list of as many as five extents (four 
if user labels were specified) when more than one 
extent is required to fill the request. [PSHDOWN] 


C 


IGG0325E 


Sorts extent table into ascending RTA sequence. 
[FIRSTPAS] 


6a Branches to subroutine that builds an F1 DSCB and an 


F3 DSCB, if required. Branches to the resident 
conversion routine to convert extent table entries from 
RTA1/RTA2 to CCHHCCHH and enters them in the 
F1 or F3 DSCB. [START1] 


Sets RACF indicator in DSCB [DS1DSIND=X‘40]] if 
auto data set indicator [JFCFLGS1=JFCBADSP] is 
set. [BLDF1A] 


Passes control to RACF to define the data set to 
RACF if the RACF indicator in the DSCB is set. 
(RACDEF TYPE=DFEFINE passing DSNAME and 
VOLSER) [NOUSER] 


If RACF indicates duplicate (return code=4) or not 
authorized to define (return code=8), sets an error 
code of X‘A® or X‘AC’ respectively. [NOUSER] 


Builds an F3 DSCB and chains it to the F! DSCB. 
[BLDF3] 


6b When a partial F1 DSCB has been supplied, builds the 


F1 using the partial DSCB as a model. [BLDF1B] 


Builds an F1 DSCB from the JFCB information. 
[BLDF1A] 


Updates the hole count (DS4DSREC) and high-water 
mark (DS4HPCHR) in the F4 DSCB, if necessary. 
[OLDHIWAT] 
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Diagram 06. Non-ISAM Allocation—F4 and F5 DSCB Updating, 
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Extended Description for Diagram 06 


This function is entered at step 1 to update the F4 and 
F5 DSCBs, after the allocation has been entered in the 
Fl and F3 DSCBs. Step 4 is entered when errors have 
occurred in previous allocation processing. Step 7 is 
entered to allocate a VIO data set, which does not 
involve VTOC modification. Step 9 is entered to 
format BPAM data sets. 


IGG0325G 


1 


Initializes pointers and counters, clears FS DSCB 
output area. If the first FS DSCB is not in virtual 
storage, branches to a subroutine that reads it in. 
Branches to a subroutine that converts the F5 extents 
from XXYYZ format to RTAI/RTA2. [DADSMSTR] 


Determines when and where the extent table entries 
should be merged with the FS DSCB extents. 
[DUELOOP] 


Merges extent table entries with the FS DSCB extents 
if the space is allocated from the beginning or middle 
of an F5 extent. [ALTEREX] 


Merges extent table entries with the FS DSCB extents 
if the space is allocated from the end of an F5 extent 
or if it takes all of the extent. [TOTALL] 


When a new F5 DSCEB has been created, searches for a 
hole (FO DSCB) on the VTOC over which the new F5 
can be written. [SEARCH] 


Converts RTA1/RTA2 entries to XX YYZ format in 
the updated/new F5 DSCB. Chains the F5 DSCB, 
completes the fields and branches to a subroutine that 
writes the F5 to the VTOC. 


When the second and subsequent FS DSCBs must be 
read into virtual storage, links to a subroutine that 


reads in the next F5 and then converts its extents from 
XXYYZ to RTAI/RTAZ2. [SAVEID] 


Branches to a subroutine that writes the last FS DSCB 
to the VTOC; transfers control to IGG0325H. 
[WRITEFNL] 


IGG0325H 
4 Sets/resets DIRF bit. Tests DIRF indicator; if there 


was a previous interrupt or if a permanent I/O error 
has been encountered, returns to caller without writing 
the F4 back to the VTOC. [START] 


‘i 


Calculates the TTR or converts the CCHHR of each 
data set to TTR format and stores it in the JFCB. 
[CONVERT] 


5a If an FO DSCB is to be written (when an F5 DSCB is 


to be removed), branches to a subroutine that writes 
the FO DSCB. [TSTZERO] 


5b Modifies the channel program and links toa 


subroutine that writes the modified F4 DSCB to the 
VTOC. [WRITEF4] 


When directory processing is required, links toa 
subroutine that dequeues the VTOC. Loads registers 
required by CVOL and transfers control to 
IGGOCLF2. [TSTDIR] 


Entered for non-directory requests, dequeues the 
VTOC, releases the Allocate work area, loads the 
return code, and returns control to the caller. 
[GOODEND] 


1GG03251 
7 This routine receives control from IGC0003B 


(Allocate initialization) when space is to allocated for 
a VIO data set. VIO data sets can be of any data set 
organization except indexed sequential or the VSAM 
organization. After storage is obtained for the virtual 
DSCB, initializes the fields of the UCB using 
constants, the volume serial number from the JFCB, 
and information from the device characteristics table. 
[BLDUCB] 


Determines the CCHH of the first track to be 
allocated to the data set. This depends on whether the 
request is for an absolute track, normal track or 
cylinder, or average block allocation. [IDETSCCHH] 


Initializes the last-track-written and track-balance 
fields in the F! DSCB. [INITLSTR] 


Calculates the number of tracks to be allocated, based 
on whether the request is for a specific (absolute) track 
or is in the from of a normal cylinder or track request. 
The number of tracks is equal to the primary number 
requested for the data set plus as much as 15 times the 
secondary quantity. If the primary quantity plus 15 
times the secondary quantity is greater than the 
volume capacity, the complete available area on the 
volume (containing system paging data sets) is 
allocated. [ALLOCTRK] 


For requests in average blocks, calculates the total 
number of tracks. [BIGABL] 


If user labels are requested, allocates a track for user 
labels. [ALLOCULT] 


C 


Uses information from the JFCB to complete the F1 
DSCB. [MRGJFCB] 


Puts the extents in the F1 DSCB. [BLDDSEXT] 


9a Puts the address of the first track allocated, and the 


number of tracks allocated, in the VIO work area of 
the VDSCB. [VIOWA] 


9b For partitioned data sets, passes the directory quantity 


and directory blocks per track to IGGOCLF2, the 
BPAM directory formatting routine. For sequential 
and direct data sets, this routine returns to the caller. 
[FREEDSCB] 


IGGOCLF2 
10 Writes 256-byte blocks with 8-byte binary zero keys in 


the directory of BPAM data sets. [BPLOOP1] 


If the data set is a VIO data set, the first issuance of 
the EXCP macro instruction to write a directory block 
causes the VIO routines to build control blocks (the 
VBPPL, and the WICB) and obtain storage for the 
virtual track. The control blocks are used to translate 
the EXCP request (see OS/VS2 VIO Logic for 
details). At conclusion of processing, issues a 
WICLOSE macro instruction to release these control 
blocks and close the VIO data set. [BPNLST] 


11 Frees work areas and returns to caller. [RETURN] 
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Diagram 07. ISAM Allocation—Overview 


DSAB list 


tT Current DSAB 


Multivolume ISAM data 
sets are allocated by a 
single invocation of the 
DADSM allocate routine 


Diagram 08 Diagram 09 Diagram 10 


From 
Allocate 
Initialization 


Builds Fl, F2 and 
F3 DSCBs for 


Updates FS and F4 
DSCBs 


Validates allocation 
request 


ISAM data 
set DD 

card entry 
a . [> Finds available space 


on volume 


e Fl! and F3 
creation 


Multivolume request 
processing 


e Fl and F3 
updating 


w~ Error handling 


EEE 


Ril 
y JFCB 


Multivolume 
| | Request 


to Scheduler 


Multivolume 
Request 


® Embedded index 
request 


Builds extent table 
of available space 


Allocation complete 


R13 


y Allocate work area 


Extended prefix and 4 
WTG table LEGEND 


t aiead 
| | 
Note: Additional input and 


output details are shown in 
Diagram 07 and 10, respectively. 


CONTROL FLOW DATA FLOW 


ee a Primary flow, ==> Input/Output “Ys 


I-ntry Point 


Indicates a 


> Secondary flow (ZZEELL > Data Modification direct-access 


a data set. usually 
On- Page Connector —= == Datu Reference a VTOC 


Off-Page @-> On-Page 
Connector Connector 
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Diagram O8. 


Entered from Allocate initialization and 


multivolume processing routines mv 


Allocate work area 


Extended prefix and 
WTG table 


R13 


F4 DSCB, data portion 


Fl DSCB (if duplicate- 
name Fl DSCB found 


in VTOC) 


First F5 DSCB on the 


VTOC 


DEB/DCB 


ECB, IOB, channel 


program 


Current DSAB 


Current DSAB 


* TIOT 


A DSABLST 


~] 
> y 
o 

>) 


ISAM Allocation—Request Validation and Free Space Search 


1 Checks for invalid requests and 
mulitvolume requests 


Invalid request 
Multivolume request, af) To error 
handling 


re 
2 Validates duplicate-name request ee 


3 Modifies TIOT entry for next pass 


4 Initializes pointers and counters for 
this pass Pg 
4 
; 
: 4 
§ Checks for available space on the VTOC 4 
4 
6 Handles absolute track request y 

_~Or-— 

7 Finds extent(s) to fill a contiguous or 
non-contiguous cylinder request VSSIIPTOELSSESTS SSL 


(“Lhihibhthhbdtat dd dats 


y 
y 
y 
4 


TIOT 


+0 
+4} DDNAME 
(if this is first DD Bo 
entry; see expansion) 
Next DD entry 
for this allocation 


 —_ OOO 
——— 
e 


| 
8 Builds a table of extents that fill the ee ee Fe 
request quantity 


R13 


Y atiocare work area 


Extended prefix and 
WTG table 


First and subsequent 
FS DSCBs 


Extent table 


To F1, F2, and F3 
DSCB Creation Routines 


For second or third DD entry 


Current 
volume 
sequence 


number 


t First TIOT DD entry 


*Indicator byte 


45 67 

a es Ae Absolute-track request 

a Blank area-type request 

a Contiguous space request 
oS Rt 18 8 Second DD statement 

o  tey “a8? 5) Index requested 

a ae Prime area requested 

rn Overflow area requested 


re 
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Extended Description for Diagram 08 
1GG032I1 


This function is entered from the Allocate 
initialization routine when an ISAM data set is to be 
allocated. 


Determines whether this is a cylinder or absolute-track 
request. [ALPHA] 


Checks for entry from the multivolume-loop module; 
if multivolume request, transfers control to next load 
(1GG032I2); checks validity of duplicate-name F1 
DSCB if one has been found. [CHECK] 


Verifies UCBs for this and preceding request are same 
for duplicate-name requests. [CONTINUE] 


Calculates the address of legitimate duplicate-name F1 
DSCB. [LEGITIMT] 


For the first DD statement, determines if a second DD 
statement exists for this ISAM allocation, checks 
validity of request type (that is, absolute track, 
cylinder) and space type (index, prime, overflow). Sets 
bit in the next RIOT entry to indicate request type and 
space type of this TIOT entry. 


For second or third DD statement, ensures that 
request type (contiguous cylinder, overflow, etc.) is 
appropriate. [NONAME] 


Sets up work area for this pass: TIOT DD entry 
pointer, primary quantity requested, embedded index 
quantity, absolute track address. [MOVEFLDS] 


1IGG03212 


5 


Sets up channel program to read FS DSCBs. 
[GOREAD] 


Sets up the FS DSCB in virtual storage to search for 
available extents. [SUCCIO] 


For absolute-track requests: 


¢ Ensures that quantity requested is on cylinder 
boundaries. [NONEHERE] 


« Finds the extent that contains the specified tracks. 
[COMPRTA] 


e Unless the last F5 extent has been reached, 
determines if the last FS extent will fill the request. 
[CHECKOUT] 


e When the extent containing the specified track is 
found, determines if the space is available. 
[STOPHERE] 


C 


e Converts XXYYZ of F5 extent to RTAI/RTA2 
and builds a one-entry extent table. [GOODQTY] 


e If there is more than one F5 DSCB on the VTOC, 
reads in next F5. [UPDATESK] 


For contiguous requests in cylinders, finds smallest F5 
extent on the volume that fills the request. [CYLREQ] 


For non-contiguous (no-option-specified) requests in 
cylinders, finds the smallest extent that fills the request 
or builds and sorts by RTA a five-entry list of the 
largest extents encountered that are insufficient to fill 
the request. [BLANK] 


Selects the extents (from two to all five) that are 
needed from the list just built to fill the request. Enters 
the extents selected in the extent table. [PICKLIST] 


If an ISAM data set is being allocated, R2 points toa 
list of DSAB addresses at the time SVC 32 is issued. 
The contents of the list depends on the number of DD 
statements associated with the data set being 
allocated: 


Word 1I—address of DSAB associated with the DD 
statement being allocated 


Word 2—address of DSAB that represents the first 
DD statement associated with the data set (the DD 
statement containing the DD name) 


Word 3—address of the DSAB that represents the 
second DD statement (zero if there is only one DD 
statement) 


Word 4—address of the DSAB that represents the 
third DD statement (zero if there are only two DD 
statements and absent if there is only one DD 
statement) 


Word 5—zero if there are three DD statements, 
otherwise absent. 
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Diagram 09. ISAM Allocation—F1, F2, F3 DSCB Updating RI 


Fil and F3 Creation 


1 Relocates channel program 


Allocate work area 


Extended prefix and 
WTG table 


From request 
validation 


F1 DSCB already on the volume fron 
previous pass? — Yes 


3 Builds Fl DSCB, except for extents 


4 Embedded index request? — Yes y 


5 Builds, chains and writes F1, F2, and 

F3 DSCBs to VTOC. Defines data set 

to RACE if necessary. Q 
6 Modifies channel program to read F5 
DSCBs 


F1, F2, F3 


DSCB Build 
Area 


R13 


Fl and F3 Updating 77 
uf 
-—>7 Modifies the existing Fl DSCB 


8 Builds a new F3 DSCB, if required; 
modifies F2 chaining pointer, if there is 
an F2 DSCB 


Allocate work area 


Extended prefix and 
WTG table 


|. _ls 


f 
Data portion of F1 DSCB 
(if duplicate-name F1 DSCB 


Or 
9 Modifies the existing F3 DSCB zzzzzzzzzzzzzzzz7g7eg2ITL 


found in VTONC) 


10 Writes new and/or modified Fl, F2, and | 


F3 DSCBs to VTOC Y 


ey” 


11 Modifies channel program to read F5 ia 
DSCBs 
Embedded Index Processing 
12 Builds F! and F3 DSCBs for embedded fp 
index and prime areas New/updated F1, F2, and 
13. Builds F2 DSCB and chains it to F1 ee oie coat | 
and F3 DSCBs. Defines data set to ie Oe ene 


Qe 


RACF is necessary. 
14 Writes F1, F2, and F3 DSCBs to the 
VTOC 
F5 DSCB 


15 Modifies channel program to read Sedat 
FS DSCBs routines 


To F4 and 


c a c — 
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Extended Description for Diagram 09 


1GG03213 
1 Relocates channel program for reading and writing 


F1, F2, and F3 DSCBs for this and subsequent loads. 
[BETA] 


Determines whether F1 DSCB already exists; if so, 
transfers control to IGG03214. Sets RACF indicator in 
DSCB (DS1DSIND=X°‘40’) if automatic data set 
protection (JFCFLGS1=JFCBADSP). [FINE] 


Builds all but extent fields of Fi DSCB. [FROMJFCB] 


For a second or third DD statement, updates volume 
sequence number. Puts volume serial number in F1 
DSCB. [NOTFIRST] 


Tests for an embedded-index request and if one is 
specified, transfers control to IGG032I15. [FILLEXTS] 


Fills in extents in F1 DSCB, builds an F3 and fills in its 
extents if required. [LOOP1] 


Builds an F2 DSCB if needed; chains F1 to F2 DSCB. 
[BUILDF2] 


Finds an FO DSCB (hole) for new F1, F2, or F3 
DSCB. Sets up channel program for writing F1, F2, 
and F3 DSCBs to VTOC. [CHANGE72] 


If DSCB has RACF indicator set, then issues 
RACDEF TYPE=DEFINE macro instruction for first 
volume of data set and RACDEF TYPE=ADDVOL 
for subsequent volumes. Sets error code X‘A®8’ or 
X‘AC’ for RACDEF return codes 4 (duplicate name) 
or 8 (not authorized to define). [ONEONLY] 


Checks for need to enqueue on VTOC with a 
‘“set-must-complete” and if required, does so. 
[CHKSMC] 


Links to resident conversion routine to convert 
RTA1/RTA2 of extent table to CCHHCCHH for F1 
and F3 DSCBs. [LOOP] 


Relocates channel program for updating F5 DSCBs. 
Transfers control to IGG03216. [XCTLDADS] 


1GG03214 


7 When this routine receives control, there will be an F1 


DSCB in virtual storage from the previous pass. 
Determines if an F3 needs to be built and if not, adds 
extents to the Fl until maximum (three extents) is 
reached or until the extent table entries are all 
processed. [FIEXISTS] 


eo 


8 If no F3 exists, builds F3 DSCB extents until extent 
table entries are exhausted, then writes F3 to VTOC. 
[BUILDF3] 


9 If there is an F2 DSCB on the volume, reads it in, 
updates the pointer to the F3 DSCB, and writes the 
updated F2 DSCB back to the VTOC [UPDATF2] 


If there is already an F3 DSCB on the VTOC for this 
data set, reads in F2 to find address of F3. 
[F3EXISTS] 


Finds the first available extent in the F3 DSCB, adds 
an extent to the F3 DSCB for each extent table entry. 
[ISAF3] 


Writes the F3 DSCB to the VTOC. Updates the 
number of extents in the F1 DSCB. [THRU] 


-10 Does a “‘set-must-complete” enqueue on the VTOC if 


required; links to IOS to read and write from the 
VTOC. [EXEC] 


11 Sets up channel program for updating the F5s. 
Transfers control to IGG03216. [KCTLDADS] 


Branches to resident conversion routine (IECPCNVT) 
to convert RTAI/RTA2 of extent table to 
CCHHCCHH format for F1 and F3 DSCBs. [LOOP] 


IGG03215 


12 Finds the middle of the prime area requested using 
extent table entries. [NEXTA] 


Determines how much space from the middle of the 
next extent table entry is needed for the index. [ICK] 


Splits extent table entry into prime and index areas. 
[CHEEK] 


Puts number of index extents into the F1 DSCB; 
converts index entries for the Fl and F3 DSCBs from 
RTAI/RTA2 to CCHHCCHH. [OUTPULL] 


Converts prime area entries for Fl and F3 DSCBs 
from RTA1/RTA2 format to CCHHCCHH. When F1 
DSCB extents are exhausted, builds an F3 to contain 
the rest of the extent table entries. [GETPRIME] 


13 Builds the F2 DSCB; chains F2 to F1. If DSCB is 
RACF-indicated, issues RACDEF TYPE=DEFINE to 
define data set to RACF. Sets return codes X‘A8’ or 
X‘AC’ for RACDEF error return codes 4 (duplicate 
name) or 8 (not authorized to define) respectively. 
[BUILDF2] 


14 Branches to the resident conversion routine 
(IECPCNVT) to convert RTA to CCHH. [LOOP] 


C 


Relocates channel program to write F1, F2, F3s to 
VTOC. [WRITEF1] 


Enqueues on VTOC (with set-must-complete, if 
required). [SEARCHFO] 


15 Relocates channel program for updating the F5 DSCB 
and branches to IGG03216. [KCTLDADS] 
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Diagram 10. 


ISAM Allocation—F5 and F4 Modification 


R13 and Multivolume Processing 


Allocated work area 


Extended prefix 
and WTG table 


F4 DSCB, Data Portion ; 


(ee | 


From F1, F2, 
and F3 DSCB 
Updating 


F4 and FS DSCB Modification 


1 Reads in F5 DSCB 
————|>> 2 Finds allocated extent in F5 and updates F5 


Form 
validation 3 Writes updated FS DSCBs to VTOC 


request 


Handles errors conditions and processes for DIRF 


5 Writes updated F4 DSCB to VTOC a 


6 Multivolume request? Yes 


Multivolume Processing 
8 Enqueues VTOC of next volume to be 
processed and reads in F4 and first F5 
DSCBs processes for DIRF Ky 
9 Searches new VTOC for duplicate-name (B) 


Fl DSCB 


7 Frees work areas, restores TIOT, loads 
. Return to 
completion code Scheduler 


~ 10 Validates the duplicate-name F1 DSCB, : 
a => if found 
To request 


validation and 
availabie 
space search 
routine to 
allocate on 
next volume 


Allocate work area 


Fi DSCB (if duplicate 


name F1 DSCB found 


First F5 DSCB 
(next volume) <©O 


Return Code * 


fi cael 
bet ad 


*See the Diagnostic Aids 
section for the return codes 
issued by the allocate 
routine and the messages 
that result from these 
return codes. 
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Extended Description for Diagram 10 
1GG03216 


1 


Calculates the TTR of the F1 DSCB and Stores it in 
the JFCB. [CONVERT] 


Initializes FS output area; initializes pointers to input 
and output areas; reads in first FS DSCB. 
[DADSMSTR] 


Determines when an extent table entry is to be merged 
into the FS DSCBs. [DUELOOP] 


Reads first and additional FS DSCBs. Resets input 
pointers and counters. Converts extents from 
CCHHCCHH to RTA1/RTA2 format. [SAVEID] 


Merges an extent table entry to add available space to 
the beginning or middle of an existing F5 extent. 
[ALTEREX] 


Merges extent table entries that are returning available 
space to the end of an existing FS extent or adding an 
extent. [TOTALL] 


Searches for a hole (FO DSCB) in the VTOC where a 
new F5 DSCB can be written. [CHEXT] 


Converts the RTAI/RTA2 entries to XX YYZ format, 
inserts F5 chain pointer, completes F5 fields, and 
writes the FS DSCB to the VTOC. [WRITEF5] 


IGG03217 


4 Tests for error condition and if found, tests DIRF 


setting; if there was a previous interrupt, takes error 
exit; if there was no previous interrupt. tests for 
permanent I/O error; if found, takes error exit; if not 
a permanent I/O error, forces an F4 to be written to 
the VTOC and takes an error exit to return to 
scheduler. [DELTA] 


Resets DIRF indicator, updates the number of FO 
DSCBs left on VTOC, relocates a channel program 
and writes the F4 DSCB to the VTOC. Tests for a 
multivolume request. For multivolume requests, 
updates UCB counter and checks for completion of 
the multivolume allocation. Increments number of 
tracks just allocated from total to be allocated and sets 
up amount to be allocated and absolute track (if 
requested) on the next volume. [NOERROR] 


For an unsuccessful allocation, resets the last 7 bytes 
of each of the concatenated DD entries to blanks. 
[MISTAKE] 


Cc 


If a multivolume request is being processed, dequeues 
on this volume and transfers control to IGG03218 for 
duplicate-name search. [MIXED] 


Checks for successful allocation. Fills a TIOT entry for 
the third DD statement for multiple DD statement 
requests. [ALLOUT] 


If allocation is completed, restores TIOT to the way it 
was before entering the Allocate routine. [OUT] 


Dequeues on VTOC. [FINAL] 


Frees Allocate work areas and returns control to 
calling routine. [CONTINUE] 


IGG032I8 


8 Relocates the channel program for reading in the F4 


DSCB and first FS DSCB and for searching the VTOC 
for a duplicate name on the next volume to be 
processed. Updates the UCB pointer in the DEB. 
Saves pointer to TIOT DD entry. [RELOCCP] 


Links to resident conversion routine to convert VTOC 
relative track address to absolute address 
(MBBCCHHR). Issues a RESERVE macro instruction 
to enqueue on the VTOC of next volume. 
[ZEROCLR] 


Reads in data portion of F4 DSCB and the first F5, 
searches for a duplicate-name F1 on the VTOC, and 
reads in the duplicate-name F! DSCB, if found. 
[EXECUTET] 


Sets/resets then tests DIRF indicator. If the DIRF bit 
(bit 5 of the DS4VTOCI field of the F4 DSCB) is set 
indicating that one error has been encountered, this 
routine sets an error code and gives control to the 
error handling routine. [CHECK] 


10 Determines if a duplicate-name DSCB is valid. 


Calculates the address of the duplicate-name F1 
DSCB. [SAMENAME] 


Saves FI and FS addresses and transfers control to the 
first load of ISAM Allocate (IGG032I1). [NOTBOS] 
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Diagram 11. VTOC Conversion—Overview 


Entered from Allocated initialization Split-cylinder Data 
and Extend routines when‘* DOS” and/or i 
“DIRF” bit is set in F4 Set Processing 


C VTOC in standard 
Doe format Sag 


hare aad 


*Valid F5 and F6 DSCBs; 
F4DSCB is now updated; 
“DOS-converted”’ and/or 
“DIR F-reclaimed’’ bits are 
now turned on; and “‘DOS’”’ 
bit turned off 


R1i3 


Diagram 12 Diagram 13 


Removes F6 
DSCBs 


Builds and writes F6 
DSCBs 


F4 DSCB 
(data portion) Removes F1 and F3 
extents from total space 


Removes split-cylinder 
extents from available 


Allocate work area 


Split-cylinder extents space Extended prefix and 
eee on volume WTG table 
Updated F4 DSCB 


(data portion) 


@ Writes FS DSCBs to 


VTOC 


Updates F4 DSCB eo Returns to Allocate 


initialization or 
Extend routine 


VTOC with “DOS” and/or 
“DIRF”’ bit set in F€ADSCB 


LEGEND 


CONTROL FLOW DATA tLOW 


> Primary Ilow, > Input/Output “, 


entry Point 
Indicates a 


ate a Secondary Flow (ZZZZIZE > Data Modification — direct-access 


data set. usually 
~ . 
On- Page Connector —— > Data Reference a VTOC. 


Off- Page @r> On-Page 
Connector Connector 
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Diagram 12. VTOC Conversion—Initialization, Non- 
Split Cylinder Data Set Conversion, 


y and Conversion Termination 
UCB 


CVTZDTAB 


Device Characteristics table 


r+ 


From Allocate 
and Extend 
Initialization 


aa 
ps3 9/ mn 
ena 


From split-cylinder, 
conversion routines 


7 Converts FS DSCB extents to XXYYZ 


1 Issues message to operator 


2 Writes zeros over the F6 ee, 
—es aaa x 
=» 3 Calculates total space on volume 


4 Subtracts VTOC and IPC records from AZZ 


total space on volume 


5 Subtracts Fl and F3 extents (except 
for split-cylinder data sets) from 
available space 


6a Creates new F5 DSCB(s), as required GAZAZZZZAAFAFA 


6b If there are split-cylinder data sets on 
the volume 


format and writes them to VTOC 


8 Updates F4 DSCB and writes it to VTOC 


9 Determines caller and returns 


R11 


ANAAANAAANANARANACANRNANANAAN 


To split-cylinder 
routine 


04 
Allocate 
BEY) Extend 


Allocate work area 


Extended prefix and 
WTG table 
F4 DSCB 


F1, F2, F3 DSCBs 
encountered on volume 


F5 DSCB being rebuilt 


Converted VTOC (updated F4 
and valid F5 and F6 DSCBs) 


UL 


C 


Extended Description for Diagram 12 
IGG0325Z 


1. This function, VTOC Conversion, is entered from the 


Allocate initialization routine or the Extend 
initialization routine when either the DOS or DIRF bit 
is on in the F4 DSCB. These bits are on when (1) an 
allocation was made on the volume by DOS or (2) an 
interrupt occurred during an updating of the VTOC, 
invalidating the contents of the VTOC, or (3) 
overlapping extents were found in a DSCB. 
[CONVTEST] 


Builds and issues a message (IEC604I) to tell the 
operator that the VTOC conversion routines have 
been entered. [BUILDMSG] 


‘Relocates channel program to write FO DSCBs over 


F6 DSCBs. Calculates number of DSCBs in the 
VTOC. [BUILDCHP] 


Tests for F6 DSCBs on the volume. Writes an FO 
DSCB over each F6 DSCB found in the VTOC. 
[ZEROF6] 


Calculates the highest track that can be allocated on 
the volume (as if no data sets existed on the volume). 
[STARTF5S] 


Determines if the volume is used for initial program 
loading (IPL) and calculates the lowest track that 
could be allocated on the volume (as if no data sets 
existed on the volume). [HIGHTRK] 


Subtracts the VTOC extent from the total space on the 
volume. [CHECK2] 


Initializes the channel program to read each F5 DSCB 
on the volume and gives control to IGG0325P. 
[INITCHPG] 


C 


If an Fl DSCB has been read in, updates the 
high-water mark. Initializes pointers and counter to 
convert the F1 extents to RTAI/RTA2 format. 
[CHECK 1] 


If an F3 DSCB has been read in, initializes pointers 
and counters to convert the F3 extents to 
RTA1/RTA2 format. [CHECK3] 


Converts all non-split-cylinder data set extents to 
RTA1/RTA2 format and enters them in the extent 
table. [CONVERT] 


When the extent table contains five entries, this 
routine sorts the entries into ascending RTA sequence. 
[ORDER] 


Compares each entry in the extent table with the 
extents in the FS DSCBs to find the F5 extent that 
contains the extent table entry. Subtracts the tracks 
allocated to the entry from the F5 extent, if this extent 
comes at the beginning or end of the F5 extent or takes 
all of the extent. [NEWCOMP] 


Subtracts the tracks allocated to the entry from the F5 
extent when the extent table entry is in the middle of 
the F5 extent. This results in the creation of two 
extents. [TWOEXTS] 


When the first F5 is filled (26 extents entered), moves 
the first rebuilt FS DSCB to the VTOC Conversion 
work area, sets up parameters, and passes control to 
IGG0325R. [PREPPARM] 


When all DSCBs have been read, branches to a 
subroutine that sorts and subtracts any remaining 
entries in the extent table from the reubuilt FS DSCBs. 
If there are split-cylinder data sets on the volume, 
control is given to IGG0325Q. Otherwise, control is 
given to IGG0325T. [FINSIHF5S] 


a C 


Finds next F5 in chain and moves an extent from the 
beginning of this F5 to the end of the previous FS. 
Moves the previous F5 DSCB to the VTOC 
Conversion work area. [MERGERTN] 


6b Determines if there are more entries in the extent 


table to be subtracted. If not, moves the first F5 to the 
Allocate work area and transfers control back to 
IGG0325W if split-cylinders extents are to be 
subtracted; otherwise, control is returned to 
IGG0325P. [UPDATPTR] 


Determines if the allocated extent is within the F5 
extent. If not, points to the next F5 extent or moves 
the next FS in the chain to the Allocate work area. 
[MORECK] 


Modifies an F5 extent when the extent table entry falls 
in the middle of the F5 extent. Moves the FS DSCB to 
the VTOC Conversion work area. Moves the next F5 
DSCB in the chain to the Allocate work area and 
moves the last extent from the previous F5 to the 
beginning of the next F5. [EXPANDCK] 


Modifies an F5 extent when the extent table entry ends 
at the same place as the F5 extent (that is, their RTA2s 
are equal). Moves the F5 DSCB to the VTOC 
conversion work area. [REPLACE2] 


Creates a new F5 DSCB and moves the last extent of a 
previous F5 into it. Moves the new F5 to the VTOC 
Conversion work area and decrements the number of 
unused DSCBs. [FINXPAND] 


1GG0325T 
7 Converts each F5 extent from RTAI/RTA2 to 


XXYYZ format. [CONVNEXT] 


Inserts the F5 indicator bytes and the F5 identification 
byte. Writes the F5 and decrements the hole count 


IGG0325R 


6a Compares each entry in the extent table with the 


(DS4DSREC field) in the F4 DSCB. [MOVEMORF] 
Finds FO DSCBs over which the rebuilt FS DSCBs will 


IGG0325P 
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5 Tests to determine if every DSCB in the VTOC has 


been read. If not, it reads the next DSCB. [TESTSW] 


Tests to determine if an Fl, F2, F3, FS, or F6 DSCB 
has been read. If an F1, F2, or F3 DSCB has been 
read, the number of unused DSCBs is decremented. 
[FIORF3] 


If an F5 DSCB has been read in, determines if there is 
space in the VTOC Conversion work area (each work 
area can contain only three F5 DSCBs). Moves the 
actual device address (CCHHR) of the FS DSCB to 
the VTOC Conversion work area. [NEXTADR1] 


extents of the current FS DSCB. [STARTCOM] 


Moves all of the extents in the current FS forward to 
wipe out an extent that was totally allocated. 
Determines if there are chained F5s. [WIPEOUT] 


Zeros out the last extent in an F5 or zeros out the last 
F5 in the chain. [COMPLAST] 


Modifies an F5 extent when the allocated extent begins 
at the beginning of the F5 extent. [REPLACE] 


Moves the modified F5 DSCB to the VTOC 
Conversion work area and finds the next F5 in the 
work area chain. [WRITENOW] 


be written. [FINDFO] 


Moves the next F5 in the chain to the Allocate work 
area. [MOVEFSIN] 


Determines whether FO DSCBs must be written over 
any FS DSCBs that have not been overwritten with 
rebuilt FS DSCBs. [FOTEST] 
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Extended Description for Diagram 12 (Continued) 


When all the F5 DSCBs have been read, converted, 
and written back, turns off the DOS bit and/or turns 
on the DOS-converted and/or DIRF-reclaimed bits, 
and writes the F4 DSCB back to the VTOC. 
[TURNOFF] 


When there is more than one F5 DSCB in the VTOC 
being converted, when more than one FS is built 
during conversion processing, or if split-cylinder data 
sets are found, a VTOC Conversion work area is 
obtained. The work area is defined by the 
IECVTCWA mapping macro, and will contain as 
many as three FS DSCBs. All FS DSCBs are created, 
modified, and maintained in virtual storage. They are 
written to the VTOC at the conclusion of conversion 
processing. 


See ‘“‘DADSM Allocate Return Codes” for return 
codes issued and resultant messages. 
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Diagram 13. WTOC Conversion—Split-Cylinder Data Sets 


From VTOC 
Conversion routine 


Reads Fl and F3 DSCBs. Finds 
split-cylinder extents 


2 Builds F6 extents; creates and 
writes more F6 DSCBs as required 


3 Subtracts Fé extents from F5 , ¢oaeeeenerceremmnscec *F6 DSCBs 


DSCB; creates more F5 DSCBs not in final format 
as required 


4 Reads each F6 DSCB; converts 
extents to final format; writes 
F6 DSCBs to VTOC 


To VTOC Conversion 
termination routine *F5 DSCBs still not 
rewritten 
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Extended Description for Diagram 13 


This function is entered from Diagram 12 whena 
VTOC being converted contains split-cylinder data set 
allocations. 


IGG0325Q 
1 Finds the first unused DSCB in the VTOC and 


initializes the F6 pointer in the F4. [BUILDF6] 


Tests to determine if all DSCBs in the VTOC have 
been read. If not, reads the next DSCB. 
[READNEXT] 


Determines if an F1 or F3 DSCB has been read. If so, 
it initializes a pointer and a counter to be used in 
testing for split-cylinder extents. [TESTF1] 


Tests to determine if the next extent is a split-cylinder 
extent. [TESTNEXT] 


Converts a split-cylinder extent from CCHH/CCHH 
to RTA1/RTA2 format. [CONVERT] 


If the RTA1/RTA2 was the first split-cylinder extent, 
builds the first F6. [CONT] 


If the RTA1/RTA2 was not the first split-cylinder 
extent, transfers control to IGG0325U. [XCTL325U] 


When all DSCBs have been read and tested for 
split-cylinder data set extents, writes out the F6 and 
transfers control to IGG0325W. [XCTL325W] 


IGG0325U 
2 Compares the RTA1/RTAZ just converted to the F6 


extent. If it lies within the F6 extent, transfers control 
to IGG0325V to check for F6 overlapping. 
[COMPARE] 


If the split-cylinder extent does not lie within the F6 
extent, updates pointers and counters to compare it 

with the next F6 extent or reads in the next F6 in the 
chain. [NOLAP] 


Creates a new F6 with the split-cylinder extent as the 
first entry. Chains the new F6 to the previous F6 and 
writes the old and new F6 DSCBs. [NEWF6] 


Rereads the first F6 and transfers control back to 
1GG0325Q. [RD1STF6] 


Creates a new F6 extent in the current F6 DSCB if the 
split-cylinder extent lies between two F6 extents. If this 
new F6 extent overlaps the F6 following it, control is 
transferred to IGG0325V. [NEWENTRY] 


C 


Moves all F6 extents one extent to the right and writes 
the F6 to the VTOC. [MOVE] 


If the F6 is chained, reads in the next F6 and continues 
to move each F6 extent to the right. [LASTF6CK] 


If the split-cylinder extent lies totally within an existing 
F6 extent, increments the data set count by one and 
writes the F6 to the VTOC. [NEWDSCNT] 


For a new F6 extent this routine moves the 
RTA1/RTA2 of the split-cylinder extent into the F6 
and initializes the data set count to one. 
[NEWEXTST] 


IGG0325V 


Tests to determine if the newly created F6 extents end 
before the next F6 extent begins. Reads in the next F6 
extent if this is the last extent in the current F6. 
[AGAIN] 


If the new F6 extent did not overlap another F6 extent 
or after all overlapping F6 extents have been 
combined into one extent, this section restores the 
original F6 and transfers control back to IGG0325U. 
[RESTORE] 


Combines two F6 extents. [COMBINE] 


Moves all extents in the current F6 forward to wipe 
out the extent that was just combined. [WIPEOUT] 


Writes a FO over the last F6, zeros out the F6 chaining 
pointer in the previous F6, and writes out this F6. 
[COMPLAST] 


Tests to determine if the split-cylinder extent ends 
within the updated F6 extent. [LASTCOMP] 


Reads in next F6 in chain and moves its first extent 
into the end of the previous F6. Writes the previous F6 
to VTOC. [MERGERTN] 


IGG0325W 
3 Moves the first FS DSCB into the Allocate work area. 


[BUILDTBL] 
Adds an F6 extent to the extent table. [ADDENTRY] 


Initializes pointers and counters and transfers control 
to IGGO0325R to subtract the entries in the extent table 
from the free space in the FS DSCBs. [SUBTRACT] 


Updates pointers to the next F6 extents to be added to 
the extent table. Reads in the F6 when all the extents 
from the previous F6 have been added. After all F6 


4 


| C 


extents have been subtracted from the F5 DSCBs, it 
rereads the first F6. [RETURNPT] 


Converts the F6 extents from RTA1/RTA2/number 
of data sets to 
RTA/number-of-shared-cylinders/number-of-data-sets 
format. [FINISHF6] 


Inserts the F6 indicator bytes and the F6 identifier 
byte. Writes the F6 and reads the next F6 in the chain. 
After all the Fé DSCBs have been converted, transfers 
control to IGG0325T. [MOVE] 
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Diagram 14. Extend Overview 


Diagram 15 Diagram 16 


Entered from EOV 
VS2 or OS catalog 
management routines 


Initializes for Extend 
processing 


Builds or modifies the Fl 
and/or F3 DSCBs 


tO/C/EOV main 

work area 

(See Diagram 15) 
R5 


Converts VTOCs to standard 


format Modifies the F5, then the 


DEB for F4 DSCB 


ee? eee eee 


R10 


Determines preferred location 
and size of extension 


TUCB for 
user’s data set 


Extended data set reflected 


R13 on VTOC 


; ‘abl 
Extend code Finds available space 


(See Diagram 15) 


LEGEND 
CONTRO! FLOW DATA FLOW 


== Primary llow, a Input/Output Ws 
Entry Point 


Indicates a 


Secondary low (ZZZzZLLP> Data Modification direct-access 


data set, usually 
~ x 
On-Page Connector a a Data Reference a VTOC. 


Off-Page @> c>C) On-Page 
Connector Connector 
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Diagram 15. Extend—Initialization and Free Space Search O/C/EOV main work area 


Entered from EOV and OS 
R5 R10 and VS2 catalog management 


O/C/EOV main work area 


DSCB area 


JFCB of data set 
to be extended 
Re-entered from 


VTOC 
Conversion 
routine 


a= 


Extend Code 


F4 DSCB, data portion 


If data set is on an RPS device, loads 
RPS appendage 


Enqueues VTOC and reads in F4 DSCB=—_———_————"] 
Searches for duplicate-name F1 DSCB | 
Processes for DIRF 


Does VTOC need to be converted or 
reclaimed? No 
Allocate /VTOC 


Gets allocate work area for VTOC Con- Conversion interface 


version routine To VTOC - SS See ee — 7 
: Conversion Allocate work area 
Builds control blocks \C routine 


Reads modified F4 DSCB 


Moves F4 DSCB into allocate work area A) 


Determines preferred location for extension 
on current volume 


Converts request to tracks 


Reads in F5 DSCB QQ 
Takes extent at preferred location | 


Searches F5 DSCBs for smallest extent that eee em ete Me es 


will fill the request 
Extended prefix and 


—Or- 

: : WTG tabl 
Builds pushdown list of extents that are too —— 
small to fill the request To Extend Y 

DSCB 
Updating 


Puts extent(s) that satisfies request in extent vs 
A 
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Extended Description for Diagram 15 
IGGOS53A 


la Entered (1) from EOV when a data set is to be 


extended, (2) from VS2 catalog management when a 
data space is to be extended, or (3) from OS catalog 
management when a catalog is to be extended. Gets 
the Extend work area. [BEGIN] 


Tests for the RPS feature. If present, gets 128-byte 
RPS work area and copies the appendage vector table 
(AVT) into it. Loads module IGGO19EK and enters its 
address in the AVT. Modifies the DEB in the 
O/C/EOV work area to point to the RPS AVT. 
[INITRRPL] 


1b Links to resident conversion routine to convert VTOC 


address from relative track address to absolute 
(CCHHR). Relocates channel program to read the F4 
DSCB and to search for a duplicate-name F1 DSCB. 
Enqueues the VTOC. If extending the data set on the 
current volume, the CCWs are altered so that no 
search of the F1 DSCBs for a duplicate name is made. 
[NORPS] 


1c Tests for invalid, duplicate-name F1 DSCB, fora 


volume containing a data set allocated by DOS, or for 
a VTOC containing invalid information, resulting 
from a previous interrupt (DIRF bit set). When a DOS 
volume or a volume on which the DIRF bit was set 
(system failed during VTOC updating, a permanent 
I/O error occurred during the reading or writing of a 
DSCB, or overlapping extents were found in a DSCB) 
is encountered, control is transferred to the VTOC 
conversion interface routine (IGG0553F). [SKIPWR] 


1d Processes for DIRF: sets/resets the DIRF bit, and if 


no previous interrupt has occurred, writes the F4 back 
to the VTOC with the DIRF bit set. If a previous 
interrupt has occurred, the F4 is not written back. The 
DOS and DIRF bits are bits 0 and 5 of the DS4VTOCI 
field of the F4 DSCB. [EXECUTET] 


IGGOS53F 


2a This routine is entered (1) when a data set is to be 


extended on a volume containing a data set allocated 
by DOS, (2) when the DIRF bit is set in the F4 DSCB 
indicating an invalid VTOC caused by a previous 
interrupt during DADSM processing, or (3) when 
overlapping extents are encountered in a DSCB. The 
VTOC must be converted to standard format or 
reclaimed by the VTOC conversion routines before 


C 


the data set can be extended. This routine is also 
re-entered when the VTOC conversion is complete. 


2b This section of code tests for first or second entry; if 
first entry, obtains an Allocate work area. 


2c Builds the DEB/DCB, IOB, and ECB in the work 
area. 


2d The F4 DSCB for the volume is moved into this work 
area from the O/C/EOV work area and control is 
transferred to IGG0325Z to convert the VTOC. 
[BEGIN] 


Ze This section of code is entered when this module is 
entered for the second time (after the VTOC has been 
converted to standard format or reclaimed). Restores 
Extend registers. Tests for errors in conversion 
processing, and, if there were none, reads the 
modified F4 DSCB into the O/C/EOV work area, 
repeats the search for a duplicate-name F1 DSCB, and 
passes control to IGGO0553G. If an error has occurred, 
passes control to IGG0553E. [ERRORTST] 


IGG0553G 


3 Verifies that there are at least three free VTOC 
records (FO DSCBs). If extending on current volume, 
sets up to calculate the last track written. [BEGIN] 


4 For current-volume allocations, converts last track 
used by the data set to be extended from relative to 
absolute address (CCHHR). This track is used as the 
preferred location for the extension. [COMPRTA] 


Converts primary quantity request in cylinders to 
tracks. [CYLTRKRC] 


For requests in records, converts records to tracks and 
calculates overhead. [INRECORD] 


If the request specifies rounding to cylinder boundary, 
this routine increments to next cylinder boundary. 
[ROUNDUP] 


Adjusts space request for user labels, if requested. 
[CLEANUP] 


IGG0553B 


5 Relocates a channel program to read in the first F5 
DSCB. [BEGIN] 


Converts the extent in an FS DSCB from XXYYZ 
format to RTA and a number of tracks. [SETUP] 


Tests for last (twenty-sixth) FS extent and, if it is the 
last extent, determines whether there is another FS. 
[TESTLOC] 


a c 


Begins the search of the FS DSCBs for space to fill the 
request by determining whether the F5 extent 
examined is the preferred extent and whether enough 
space is available at that location. [BEGSURCH] 


Compares extent just found, which is larger than 
request, with extent being held to determine which is 
closest in size to the request. If the new extent is closer 
in size, it becomes the "held" extent. [COMPARE] 


If no extent has been held, compares extent just found, 
which is smaller than request, with the smallest of the 
five entries in the pushdown list and saves the larger 
extent. It then arranges the modified pushdown list in 
order of decreasing extent size. [QTNOTAVL] 


When quantity and preferred track are available, 
builds a one-entry table. [ONEDADSM] 


If an extent has been held (that is, an extent has been 
found equal to or larger than the request), builds a 
one-entry extent table. [FILLIT] 


The extents in the pushdown list are examined to 
determine whether two or more of the extents can be 
used to fill the request. If so, the extents that satisfy 
the request are entered in the extent table. 
[PICKLIST] 


PY Extend Code: 

Code Meaning 

01 Extend a data set on current volume (EOV 
request). 

02 Extend the OS catalog on the current 
volume (OS catalog management request). 

04 Extend a data set on a new volume (EOV 
request). 


129(X’81’) Extend a data space on the current volume 
(VSAM catalog request). 
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Diagram 16. Extend—DSCB Updating 


R4 


" O/COEOV main work area 


Ril 


’ Extend work area 


Extended prefix and 
WTG table 


F5 DSCB 


Extent table 


(en 5 


From Extend 
Initialization 


Initializes for building and/or modifying Fl and/or 
F3 DSCBs 


R13 


A 
C=> Return Code A 


R@and R14 = 0 for VS2 master 
catalog request 


Builds F1 DSCB and F3 DSCB (if required) for 
extending on a new volume; defines to RACF 
if necessary 

-or- 
Modifies F1 DSCB and builds or modifies F3 
DSCB for extending on current volume 
Fi, F3, DSCBs 


Chains and writes F3, then Fl! DSCB to VTOC 


Merges extent table entries with F5 extents, reads 
in additional FS DSCBs as required, and writes 
updated FS DSCBs to VTOC 


Handles errors oe 


Processes for DIRF 


Writes FO DSCB, if required, to remove FS DSCB 
Writes updated F4 DSCB back to VTOC 


Frees work areas and returns control ale 


EOV, or OS or VS2 
catalog management 


FS DSCB 
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Extended Description for Diagram 16 


1GG0553C 


1 If the task that requires more direct-access space has 
not obtained step-must-complete status (by issuing 
ENQ with SMC=STEP or STATUS macro), this 
routine branches to the STATUS routine to obtain 
step-must-complete status. [BEGIN] 


2 Reads F1 DSCB to virtual storage if extending on 
current volume. [READF1] 


Determines whether extents to be added will bring 
total for data set to more than 16. If so, returns to 
caller via last load. Determines whether extent(s) can 
be added to the Fl and whether an F3 needs to be 
built. INVL] 


If an F3 DSCB already exists for this data set, this 
routine reads it into extend work area. [NOTF1] 


For extensions on new volumes, builds a new F1 from 
the JFCB. [BUILDF1] 


If the data set is RACF-indicated (DEBXDSSI is on), 
issues RACDEF TYPE=ADDVOL to add new 
volume to data set definition. If R15=0, successful; if 
R15 is not zero, sets RACF error indicator 
(DXEXTSW=RACERROR) and exits to IGG0553E. 
[NOSECUR] 


3 Converts RTAI/RTAZ2 from extent table to 
CCHHCCHH and moves converted extents to the F1 
or F3 DSCB being built or modified. Accounts for user 
label track. [STLOOP] 


4 If no F3 exists for this data set, this routine searches 
for an FO DSCB. If there is already an F3 on the 
volume or after an FO DSCB 1s found, this routine 
writes the F3 to the VTOC. [WROUTF3] 


Chains F1 DSCB to F3 DSCB if an F3 exists, sets 
number of extents in the F1. If extending on a new 
volume, this routine searches the VTOC for an FO 
DSCB, over which the new F1 can be written. Writes 
the F1 DSCB to the VTOC. [WRITEF1] 


Modifies channel program to read and write the F5 
and F4 DSCBs. [MODIFYCP] 


IGG0553D 


5 Gets F5 input work area address, initializes pointers 
and counters, and modifies channel program to read 
first FS DSCB. Reads first FS DSCB. [DADSMSTR] 


C 


Determines when and where extent table should be 
merged into the output for the F5 DSCB. 
{[DUELOOP] 


Merges the extent table entries with the FS DSCB 
extents if atocation is made from the beginning or 
middle of an F5 extent. [ALTEREX] 


Merges the extent table entries with the F5 extent 
when the allocation is made from the end of the F5 
extent or if all of the extent is allocated. [TOTALL] 


Converts F5 extents from RTA1/RTA2 to XX YYZ 
format and writes the F5 to the VTOC. [WRITEF5] 


Determines whether there is more than one F5 DSCB 
on the VTOC. [CHECHAIN] 


Writes the last FS to VTOC. [WRITEFNL] 


Finds an FO DSCB over which the new F5 DSCB can 
be written. [CHEXT] 


If more F5 DSCBs were read from the VTOC than 
were written back, sets an indicator to cause the next 
load (F4 DSCB updating routine) to write an FO. 
{TSTZERO] 


When the second and subsequent F5 DSCBs are to be 
read into virtual storage, resets input pointers and 
extent counter, then initiates the read operation. 
[READFS] 


1IGG0553E 
6 Resets DIRF switch and tests DIRF bit in the F4 


DSCB. Checks for permanent I/O error passed from 
previous routines. [CHKIOERR] 


Determines whether an FO DSCB needs to be written 
to the VTOC. If so, modifies the channel program and 
writes the FO DSCB. [START] 


Updates the F4 DSCB count and writes the F4 DSCB 
to the VTOC. [WRITEF4] 


Dequeues the VTOC. If a permanent I/O error 
occurred while reading from or writing to the VTOC 
during Extend processing, issues message IEC6031. 
Frees the Extend work area(s) (if RPS feature is 
present on the device, restores the work area DEB) 
and determines whether to exit to EOV, to VS2 
catalog management, or OS catalog management. 
Loads appropriate return code in register 13. 
{EXITHERE] 


For normal return to EOV or VSAM, loads the 
address of the SVRB into register 15, restores the 
calling routine’s registers (2 through 12) and transfers 


Pi nn C 


control to the catalog management routine using the 
XCTL macro or to EOV using the IECRES macro. 
[TESTRTRN] 


Return Code 
¢ To EOV: 

1(1) successful secondary allocation on 
current volume 

4(4) successful secondary allocation on new 
volume 

-1(-1) error in secondary allocation on current 
volume 
e fewer than three free VTOC records 

(format-0 DSCBs) 


e quantity not available 


e too many extents (more than 16) for 
the data set on this volume 


-4(-4) error in secondary allocation on the new 
volume 


« duplicate name on the new volume 


e fewer than three free VTOC records 
(format-O0 DSCBs) 


e quantity not available 


-8(-8) unable to convert VTOC to standard 
format or a volume with the alternate 
tracks on cylinder 0 was encountered 
(DOS allocation) 


-12(-C) Unable to define new volume to RACF 
-16{-10) permanent I/O error 


» To VS2 Catalog Management: 


129(81) successful secondary allocation on 
current volume 


-129(-81) error in secondary allocation on new 
volume 


e fewer than three free VTOC records 
(format-0 DSCBs) 


* quantity not available 


« too many extents (more than 16) for 
the data space on this volume 
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To OS Catalog Management: 

212) successful secondary allocation on 
current volume 

-2(-2) error in secondary allocation on current 
volume 


e fewer than three free VTOC records 
(format-0 DSCBs) 


* quantity not available 


¢ too many extents (more than 16) for 
the data set on this volume 


-8(-8) unable to convert VTOC to standard 
format or a volume with the alternate 
tracks on cylinder 0 was encountered 
(DOS allocation) 


-16(-10) permanent I/O error 
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Diagram 17. Scratch Overview 
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Builds table of 
extents to be 
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| deme ee 
Issues demount and 

Volume list 
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MSS SVC 


Deletes Fl, F2, 
and F3 DSCBs 


Updates F4 DSCB 


Processes for SMF 


Volume List 


Volume 
serial 
number 


or All volumes 


processed? 


Updates 
shared 


extents 
(F6 DSCBs) 


Scratch status code 


Note: Additional input 
and output details are 
presented in Diagrams 18 
and 20, respectively 


Volume 
serial 
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Number of entries in the volume 
list, one for each entry on which 
the data set resides. 

LEGEND 
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Diagram 18. Scratch—Initialization, Volume Mounting 
and Volume Verification 


RO 


UCB for device on 


which the volume that 

contains data set to be == 
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Extended Description for Diagram 18 


This function is entered from the SVC SLIH as a result 
of the issuance of SVC 29, which is part of the 
expansion of the SCRATCH macro. The purpose of 
this function is to delete data sets and VSAM data 
spaces. 


1IGC00021 
1 Issues the IECRES GET macro to get the Scratch 


work area (see OS/VS2 Open/Close/EOV Logic for a 
description of the IECRES macro). [BEGIN] 


Checks for a caller executing in supervisor state or ina 
system storage protection key (key 0 through 7). If 
neither, this routine branches to the resident address 
validation routine (IEAOVLO0) to verify that the 
volume list passed by the caller has the same 
protection key as indicated in the TCB. [VALCK] 


Before enqueuing on the TIOT, checks the Scratch 
option indicator in the Scratch parameter list to 
determine if the scratch request has been issued by the 
dynamic allocation component, which will have 
already enqueued on the TIOT. If the request is not 
from dynamic allocation, this routine attempts to 
enqueue on the TIOT. If this resource is not available, 
the data set is in the process of being opened or closed, 
and therefore cannot be scratched. [BYPASS] 


When the caller passes the address of a UCB in 
register 0, searches the DSAB chain for a TIOT DD 
entry that contains this UCB address. This search will 
verify that the unit associated with the UCB is 
allocated to the job. If the unit is allocated to this job, 
this routine verifies that the volume on the device is 
eligible for demounting. [USERSUCB] 


This routine is entered (1) when no UCB address is 
passed, (2) when the UCB address passed represents a 
device that is not allocated to the job step, and (3) 
when the UCB address represents a volume that is not 
eligible for demounting. The function of this routine is 
to search the DSAB chain for a TIOT entry whose 
UCB contains the volume serial number of a volume 
in the volume list (to determine if any volume in the 
volume list is mounted on a unit allocated to this job). 
If so, this routine verifies that the UCB represents a 
volume that is on-line and available for demounting. 
[FINDUNIT] 


This routine is entered when a VIO data set is being 
scratched. A VIO data set allocation request is 
identified by (1) the address of a virtual UCB is passed 
in register 0 or (2) the current volume list entry is a 


C 


serial number of a virtual volume and the data set 
name is temporary. The function of this routine is to 
search the DSABs for a TIOT entry containing (1) a 
virtual UCB whose virtual DSCB contains the same 
name as the data set being scratched and (2) the 
volume serial number in the virtual UCB that matches 
the volume serial number in the current entry of the 
volume list. If a match is found and if the data set has 
ever been open, this routine issues the VSCRATCH 
macro and zeros the data portion of the virtual DSCB. 
[VIODSTST] 


Attempts to enqueue on the resource named SYSDSN. 
If the resource is not available for exclusive control, 
the data set is currently allocated to this or another 
address space and cannot be scratched. 
[DSNAMENQ] 


If there are no entries in the volume list, if the validity 
check in step 1 fails, if the data set to be scratched is 
allocated, or if the VDSCB cannot be found, Scratch 
processing is terminated by branching to IGGO290D. 
[ERREXIT] 


1GG0290E 
6 Builds a DEB/DCB and an JOB with the information 


required by IOS to read from and write to the VTOC 
of the volume from which the data set is to be deleted. 
{[BLDBLKS] 


Searches the DSAB chain for a TIOT entry whose 
UCB contains the volume serial number of the current 
volume-list entry. [FINDUCB] 


If the current entry in the volume list is not mounted 
on a device allocated to the job, searches the UCB 
look-up table for a UCB with a volume serial number 
that matches the volume serial number of the current 
entry in the volume list. [TABLSRCH] 


If the current volume list entry was found on an 
unallocated unit, builds the request blocks required to 
dynamically allocate the unit and issues the 
DYNALLOC macro to request that the unit be 
allocated to this job. [ALLOCVOL] 


If the volume was not mounted on any unit or if the 
dynamic allocation request was unsuccessful, sets up 
to request that the volume be mounted on an 
available, demountable unit. [MOUNTVOL] 


IGG0290F 
7 Determines if the unit associated with the UCB is 


eligible for demounting. [MNT00100] 
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If another volume is to be mounted after the current 
volume is demounted, enqueues on the volume serial 
number of the next volume. [MNT00200] 


Calls a subroutine that builds the demount message 
IEC502E, then completes the message and calls 
another subroutine that issues the message. If the 
volume is an MSS virtual volume, this module calls a 
subroutine which builds a parameter list and issues the 
macro ICBMNTDE to demount the volume. 
[MNT00400] 


Builds the demount message. If the ‘MONITOR 
SPACE” command has been issued or if demounting 
activity is being monitored for SMF, this routine issues 
SVC 78 (LSPACE, see Diagram 26) to gather 
information about the space available on the volume 
for the demount message or for recording in the 
type-19 SMF data set record. This routine also issues 
SVC 98 (VOLSTAT) to write a volume statistics 
record on the SYS1.LOGREC data set. [MNT11000] 


Calls a subroutine that sets the mount bit in the UCB. 
Builds and issues a mount message IEC601D or, if the 
UCB indicates both an MSS virtual volume and a 
JES3-managed unit, builds an SSOB and passes it to 
JES3 via the IEFSSREQ macro for mounting 
approval. Upon approval, issues SVC 126 by use of the 
ICBMNTDE macro to mount the virtual volume. 
Upon disapproval, loads the return code of 8 into 
register 15, dequeues from the volume serial number 
(resource name is SYSZVOLS), and returns to the 
calling routine. [MNT03000] 


If the UCB indicates an MSS virtual volume that is not 
JES3-managed, issues SVC 126 by use of the 
ICBMNTDE macro to mount the virtual volume. 
[MNT03005] 


Also issues a TPUT macro to write message IEC1081 
to the TSO terminal, unless it is an MSS virtual 
volume in which case the message is ignored. 
[MNT03000] 


Builds and executes a channel program to read the 
volume label (record 3 of track 0, cylinder 0), then 
calls a subroutine that resets the mount bit in the 
UCB. [MNT04000] 


If the operator mounted the wrong volume, branches 
to a subroutine that builds and issues a message telling 
the operator that the volume is not accepted. In the 
case of MSS virtual volumes, the message indicates 
that a hardware error occurred. [MNT04200] 


Calls a subroutine that converts the actual device 
address (CCHHR) of the VTOC to a relative track 
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Extended Description for Diagram 18 (Continued) 


address (TTR), then moves the TTR of the VTOC and 
the volume serial number to the UCB. [MNT05000] 


Updates the volume disposition in the UCB for the 
newly mounted volume. [MNT05100] 


Loads the return code in register 15, dequeues from 
the volume serial number (resource name is 
SYSZVOLS), and returns to the calling routine. 
[MNT01 500] 


IGG0290E 


9 


When the volume is mounted, tests to see if the device 
has the RPS feature. If the RPS feature is present, gets 
a work area to be used by the RPS appendage, loads 
the appendage (IGG019EK), and puts its address in 
the appendage vector table (AVT). [MOUNTED] 


10 This routine enqueues on the VTOC using the 


RESERVE macro with the “‘set-must-complete” 
option. ISSUENQ] 


Scratch Option Indicator: 


Indicator Meaning 
41005000 — override expiration date 
41 00 4000 — no override of expiration authorized 


41 80 DO 00 — override expiration date, TIOT 
enqueued by dynamic 
UNALLOCATION 

41 80 CO 00 — no override authorized, TIOT 
enqueued by dynamic allocation 

41 8050 00 — override expiration date, request from 
job or step termination component 

41 80 40 00 — no override of expiration data 
authorized, request from job or step 
termination component 


a 


31307] WSAVGC ZSA/SO 88 


Diagram 19. DSCB Deletion and Split-cylnder DSCB 
Updating 
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Extended Description for Diagram 19 
1GGO298A 


1 


la 


This routine is entered from Scratch initialization and 
reentered from SECLOADA,; the entry condition is 
determted from the contents of register 10. 


(1) If this is the first entry to this module, register 10 
will contain a pointer to the Scratch parameter list 


(2) If reentered from SECLOADA, register 10 can 
contain one of the following: 


00 00 00 00 — Password verified 

10000000 — Password error 

20 00 00 00 — No PASSWORD data set on 
SYSRES 


Tests for an entry from SECLOADA. If this is not an 
entry from the SECLOADA module, relocates a 
channel program to read the F4 DSCB and F1 DSCB 
for the data set to be scratched into the Scratch work 
area. [BEGIN] 


Branches to a subroutine that links to IOS to read in 
the F4 DSCB and the F1 DSCB to be deleted. Tests to 
verify that an F1 DSCB has been read in. [EXECUTE] 


This routine issues the ENQ macro to enqueue on the 
data set name of the data set to be scratched. If the 
return code from the ENQ macro request indicates 
that some task could be open to the data set being 
scratched, this routine examines the DEBs assigned to 
this job, comparing the starting CCHH in the first 
extent in the DEB to the CCHH of the first data extent 
in the DSCB to ensure that no task is currently open to 
the data set. [NEWDSCB] 


If it is RACF-indicated (DS1IDSIND=X‘40’), bypasses 
password checking. 


Ib Sets error code 8 if a VSAM data space. Issues a 


RACHECK macro or ALTER authorization to the 
data set/volser entity. If the data set RACHECK fails, 
checks ALTER authorization to DASDVOL volume 
serial entity, and permits SCRATCH if so authorized. 
If neither is authorized, sets error code 8 and exits; 
otherwise, continues. [PSWDCHK] 


Determines whether the data set has password 
protection; if the password has not already been 
verified, passes control to the SECLOADA module of 
Open/EOV password protection (see OS/VS2 
Open/Close/EOV Logic). [(PSWDCHK] 


When entered from SECLOADA and register 10 
contains a zero, which indicates that the password has 
been successfully verified, this routine restores 
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registers and addresses used in password processing. 
[PASSOKAY] 


If the data set is not password-protected, receives 
comtrol after the F1 DSCB has been read in. If the 
expiration date for the data set has not been 
overridden (indicator set in Scratch parameter list), 
verifies that the expiration date is passed. 
[NAMEOKAY] 


IGGO799A 
3a Checks DSCB (DS1DSIND=X°‘40’) to see if it is 


RACF defined. If it is defined, issues a RACDEF 
DELETE macro instruction to remove the volume 
from the data set definition. 


Return code=0—Successful; continue 
Return code=4—Volume not defined; 
set error code=8 
unless authorized to the DASDVOL 
Return code=8—Not authorized to delete; 
set error code=8 
unless authorized to the DASDVOL 
[BEGIN] 


Checks the number of extents to be deleted and if 
there are more than 16, sets the DOS bit in the 
DS4VTOCI field and writes the modified F4 DSCB 
back to the VTOC. This is done so that the next time 
an allocation is made on the volume, the VTOC 
Conversion routine will be executed in order to correc! 
the F5 and F6 DSCBs. {[BLDTAB] 


Sets/resets the DIRF bit and tests for previous 
premature termination of a DADSM function. If no 


such interruption occurred, writes the F4 back to the 
VTOC. [MOVECCW] 


If no premature termination occurred or the F4 has 
been written back to the VTOC, sets/resets the DIRF 
bit for writing out in IGG0290D. Then the channel 
program is modified to write an FO DSCB over the F1 
and to read in an F2 and/or an F3 if they exist on the 
VTOC. [SKPWR] 


Determines if there is a DSCB in virtual storage with 
extents to be converted. [TESTPTR] 


When F3 DSCBs are read in, sets up work area and 
branches to a subroutine that converts the F3 extents 
to RTA1/RTA2 format. If the data set resides on an 
MSS virtual volume, a subroutine is called to build a 
parameter list describing the extents which will be 
passed to SVC 126 to free the staging volume space. 
[MOREXTS] 


co 


Links to the resident conversion routine to convert the 
F1 and F3 extents from CCHHR to RTA1/RTA2 
format and stores each converted extent in the extent 
table. [CVTEXTS] 


5 Links to a subroutine that writes an FO over an F1 or 
F3 DSCB or an F2 DSCB (whose extents have 
previously been converted and entered in the extent 
table). When the FO is written, the channel program 
then reads in the next DSCB in the chain if there is 
one. [ZEROUT] 


6a When there are no more F1, F2, or F3 DSCBs in the 
chain, inserts in the CCW the address of the F6 DSCB 
for split-cylinder data sets or the F5 DSCB for 
non-split-cylinder data sets, so that one or the other is 
read in by the channel program that writes the last FO 
DSCB. [LASTDSCB] 


1GG0290B 


Modifies a channel program that searches for FO 
DSCBs and reads or writes Fé DSCBs. If there are no 
entries in the extent table or if the DOS or DIRF bit is 
set, Scratch processing is terminated and control is 
passed to IGG0290D. [BEGIN] 


6b Sorts the extent table into ascending RTA sequence. 
[NEWPASS] 


Tests for shared cylinders and exits to IGG0290D if 
not present. Sets ups pointers and counters to build or 
modify an Fé DSCB. [TESTCYLS] 


6c Checks each extent entry in the extent table to 
determine if it represents a shared extent. Searches for 
the extent in the F6 DSCB. When found, the number 
of data sets sharing the extent is decremented by one. 
If the number of data sets reach zero, the XXYYZ for 
this extent is converted to RTAI/RTA2 and moved to 
the extent table. [COMPARE] 


When an entry in the extent table is encountered that 
does not share cylinders, this routine increments the 
extent table pointers and counter. [NOTSPLIT] 


6d When data sets other than the one being scratched are 
still using the extent currently being examined, moves 
the extent (with a decremented number of data sets) to 
the output area to be written back to the VTOC. 
[LOOKAHED] 


When the F6 DSCB extents have been compared with 
the split-cylinder extent in the extent table and when 
this F6 is chained to another F6, reads in the next F6 
in the chain. [CHECKIN] 
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When extent entries have been made in an F6 output 
DSCB, determines whether a chaining pointer needs 
to be put in the F6 before it is written out. A pointer is 
not needed if (1) only one entry is left in the extent 
table and it is for a split-cylinder extent, and (2) only 
one extent is left in the input Fé DSCB that has a data 
set count of one and is contained in the single extent in 
the extent table. When neither of the above conditions 
is met, a pointer is added to the F6 and the F6 1s 
written back to the VTOC. [DADSOUT1] 


When there are no unprocessed entries in the extent 
table, reads into virtual storage the first FS DSCB on 
the VTOC and passes control to IGG0290C. 
[ENDUPD2] 
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Diagram 20. Scratch—Format-5 and Format-4 
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Extended Description for Diagram 20 
IGG0290C 


This function is entered after the extent table has been 
built and the F1, F2, and F3 DSCBs have been 
removed from the VTOC. 


Sets up counters and pointers in input and output F5 
work areas. Calls a subroutine that links to the 
resident conversion routine to convert the XX YYZ of 
the first F5 to RTA1/RTA2. [BEGUN] 


Compares the RTA1/RTAZ of the extent table entries 
with the RTA1/RTA2 of the FS DSCB to determine 
where to merge the extent table entries. [MERGE1] 


Merges extent table entries with the F5 extents when 
overlapping extents are detected. [OVERLAP] 


Determines when an F5 DSCB must be written to the 
VTOC and when a new FS must be read in. 
[OUTPUT] 


Modifies a channel program and links to IOS to read 
in the second and subsequent F5 DSCBs; calls a 
subroutine to convert the F5 extents from XXYYZ to 
RTAI/RTA2. [DADSMIN] 


Converts XXYYZ of F5 extents to RTAI/RTAZ. Sets 
up extent counters and pointers. [CVTORTAO] 


Determines if two F5 output extents are contiguous 
and if so, combines them into a single extent. 
[COLLAPSE] 


Converts the F5 output extents from RTA1/RTA2 to 
XXYYZ, modifies the channel program to write the 
F5 to the VTOC, and branches to a subroutine that 
links to IOS to write the F5 to the VTOC. 
[DADSMOUT] 


When a new FS DSCB has been built and an FO must 
be found to write it over, branches to a subroutine that 
searches for an FO on the VTOC. [FINDHOLE] 


IGG0290D 


If a VIOC is enqueued, tests to determine if errors 
were encountered while processing this volume. If no 
errors were encountered, updates the number of FO 
DSCBs on the VTOC and writes the F4 DSCB back to 
the VTOC. [BEGIN] 
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Dequeues VTOC. [TESTEXIT] 


Builds and issues message IEC603]1 if an I/O error 
occurred or if overlapping extents were encountered in 
the FS DSCB. [TSTIOERR] 


If the unit (UCB) was dynamically allocated, builds 
the request block required to deallocate the unit and 
issues the DYNALLOC macro (SVC 99) to deallocate 
the unit. [TSTALLOC] 


Determines if all entries in the volume list have been 
processed. If there are unprocessed entries, passes 
control to the Scratch initialization function 
(IGG0290E) to process the next volume in the volume 
list. [TESTLAST] 


If a volume was mounted during Scratch initialization, 
sets up to request that the volume be demounted. A 
test is made to see if an MSS parameter list had been 
built. If yes, the routine issues ICBACREL to call SVC 
126 to relinquish the data space. [DEQTEST1] 


1GG0290F 


Calls a subroutine that builds the demount message 
IEC502E. Completes the message and calls another 
subroutine that issues the message. For MSS virtual 
volumes, an SVC 126 is issued. [MNT00400] 


Builds the demount message. If the “MONITOR 
SPACE” command has been issued or if demounting 
activity is being monitored for SMF, issues SVC 78 
(LSPACE, see Diagram 26) to gather information 
about the space available on the volume for the 
demount message or for the SMF data set (record 
type-19). Also issues SVC 98 (VOLSTAT) to write a 
volume statistics record on the SYS1.LOGREC data 
set. [MNT 11000] 


1GG0290D 


7 If the data set name was enqueued upon exclusively, 


dequeues from the data set name (resource name is 
SYSDSN). [DEQTESTZ2] 


If the TIOT was enqueued upon, dequeues (resource 
name is SYSZTIOT). [DEQTEST3] 


When the Scratch processing is complete and was 
successful or partly successful, determines whether 
data set activity is being monitored and, if so, builds 
and writes a type-17 record to the SMF data set. 
[TESTSMF] 


When all of the entries in the volume list have been 
processed, issues the IECRES macro to free the 
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Scratch work area(s). See OS/VS2 Open/Close/EOV 
Logic for a description of the function of the IECRES 
macro. If the scratch was successful or if an invalid 
volume list was provided, control is returned to the 
caller with a return code of 0 (if successful) or 12 (if 
invalid) in register 15. In all other cases, control is 
passed to IGG029DM. [EXIT] 


IGG029DM 


This dummy CSECT immediately passes control using 
the return address in register 14. 


A Return Code 
Code Meaning 
0 Successful scratch. 


4 No volumes containing any part of the data 
set were mounted, nor did register 0 contain 
the address of a unit that was available for 
mounting a volume of the data set to be 
scratched. (This return code is accompanied 
by the setting of status code 5 in all entries of 
the volume list.) 


8 An unusual condition was encountered on 
one or more volumes. 


12 Invalid volume. (This return code is not 
accompanied by the setting of a status code.) 


B Scratch Status Code: 
Code Meaning 


0 The DSCB for the data set has been deleted 
from the VTOC on the volume pointed to. 

1 The VTOC of this volume does not contain 
the DSCB to be deleted. 

2 The macro instruction failed when the 


correct password was not supplied by the 
console operator or TSO terminal operator 
in the two attempts allowed, or the user tried 
to scratch a VSAM data space. 

3 The DSCB was not deleted because either 
the OVRD option was not specified or the 
retention cycle had not expired. 


4 A permanent I/O error on an invalid F1 
DSCB was encountered when processing this 
volume. 

5 It could not be verified that this volume was 


mounted nor was there a unit available for 
mounting the volume. If one or more of the 
volumes was an MSS mass-storage volume, 
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Extended Description for Diagram 20 (Continued) 


see the explanation of message IEC666lI in 
OS/VS Message Library: VS2 System 
Messages. 


The operator was unable to mount this 
volume. If the volume is an MSS virtual 
volume and is running in a JES3 
environment, JES3 would not allow the 
volume to be mounted. 


The DSCB was not deleted because the data 
set was open. 


The DSCB indicates the data set is defined 
to RACF but either the accessor is not 
authorized to the data set or to the volume, 
or the data set is a VSAM data space, or the 
data set is not defined to RACF. 


dn sv 
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Diagram 21. Partial Release—Overview 
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Diagram 22. Partial Release—F1 and F3 DSCB Updating 


Entered from Close or 
Checkpoint restart 
via XCEL 


O/C/EOV work area 
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+ User’s DCB 
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5 Locates the extent containing last track written Ee DOC le, 
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7 Writes an FO DSCB over the F3 DSCB, if all 
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Extended Description for Diagram 22 


IGGO020P1 
la Entered from the Reposition I/O module of 


Checkpoint/Restart or from Close function of 
O/C/EOV, this routine gets a work area for the 
Partial Release routines using the IECRES macro, 
described in OS/VS2 Open/Close/EOV Logic. 
Initializes a channel program and picks up the F4 
(VTOC) DSCB address from the UCB. Tests for the 
RPS feature. If present, gets 128-byte RPS work area 
and copies the appendage vector table (AVT) into it. 
Loads module IGG019EK and enters its address in the 
AVT. Modifies the DEB in the O/C/EOV main work 
area to point to the RPS AVT. [BEGINA] 


Enqueues the VTOC using a RESERVE macro 
instruction with the “‘set-must-complete” option. 
Branches to a subroutine to read in the F4 DSCB. 
[SKIPRPS] 


Sets/resets and tests the DIRF indicator, and if no 
previous interrupt has occurred, writes the F4 to the 
VTOC with the DIRF bit set. [SETVTOC] 


When entered from Checkpoint/Restart, attempts to 
enqueue exclusively on the data set name (resource 
name is SYSDSN). [DSENQ1] 


When entered from Close, requests a change of status 
to exclusive control of the TIOT (resource name is 
SYSZTIOT). Reads the key of the F! DSCB. 
(TIOTENQ] 


When entered from Close, searches the DEB table to 
ensure that this job has no other DCBs open to the 
data set. Then searches the TCB DEB chain (if 
entered from Close) or the Restart DEB chain (if 
entered from Restart) to ensure that this job has no 
other DCBs open to the data set. [DEBSRCH] 


For requests made in a number of cylinders, this 
routine determines whether the last track written to 
the data set to be released was on a cylinder boundary, 
and if not, rounds the extent to the next cylinder 
boundary. [ROUNDCYL] 


Determines whether the extent to be released is in the 
Fl or F3 DSCB and branches accordingly. 
[SAVEFMT3] 


Locates the extent containing the last track written 
when it is in an F1 DSCB. When found, the request 
type (cylinder or rounded record) is determined. 
[FIRUTINE] 


C 


3 Determines if last track written is the last track of the 


extent. If not the last track, inserts the new end of the 
extent (last track actually used), and links to a 
subroutine that converts the CCHH to RTAI/RTA2 
and enters it in the extent table. [CYLREQ] 


When the last track written is the last track of an 
extent in an Fl DSCB, determines if there is another 
extent. If the extent containing the last track written is 
not the last extent of the data set, branches to a 
subroutine that calls the resident conversion routine to 
convert the CCHHCCHH of any subsequent extents to 
RTA1/RTA2 format. These extents are entered in the 
extent table. [CHECKLST] 


IGG020P2 
4 Checks to see if there is an F3 for this data set, and, if 


so, modifies the channel program and reads in the F3 
DSCB. [CHECKF3] 


Locates the extent containing the last track written if 
this extent is in the F3 DSCB. [BEGINA] 


When the F3 extent containing the address of the last 
track written is located, links to a subroutine that 
converts the portion of the extent that is to be released 
and any subsequent extents in the F3 DSCB from 
CCHHCCHH to RTA1/RTA2 format and enters 
them in the extent table. [LSTRACK] 


Calls the resident conversion routine to convert the F3 
extents from CCHH to RTAI/RTA2Z. Enters the 
converted extents in the extent table. [CVTORTA| 


When all extents are released from an F3 DSCB, 
modifies the channel program and links to a 
subroutine that writes an FO DSCB over the released 
F3 DSCB. [WRITEZRO] 


Updates the Fl DSCB with the number of extents 
temaining in the volume for the data set. Tests for 
SMF and if present, enters the amount of space 
released in the TCTIOT. [UPDATEF1] 


IGG020D0 
8 Writes back the F! DSCB to the VTOC. If no space is 


being released, transfers control to IGGO20P3. 
[BEGINA] 


If the DOS or DIRF bit is set, this routine transfers 
control to IGG020P3, bypassing updating of the F5 
DSCB(s). [DOSCHECK] 


Sorts extent table into ascending RTA sequence. 
[NEWPASS] 


y Cc 


10 Relocates channel program for reading and writing F5 
DSCBS. Links to a subroutine to read in first F5 
DSCB. [RELOCATE] 
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Diagram 23. Partial Release—F5 and F4 DSCB Updating 
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Initializes for FS DSCB updating 


Merges extent table entries into FS DSCB 


Writes updated F5 DSCB to the VTOC 
Reads in additional FS DSCBs 


Searches for FO DSCB when a new F5 DSCB 
is created Unused portions of 
the extent(s) of the 
data set have been 


Writes in FO DSCB over an F5 DSCB when all released 
extents have been deleted 


R1 


Return Code 


Handles errors 


Processes for DIRF 


Writes updated F4 DSCB to the VTOC ff 


Dequeues VTOC, frees the Partial Release 


work area and returns to caller 


LOL UoTeJadGC Jo poy 


c 


Extended Description for Diagram 23 


This function is entered after the F! and F3 DSCBs 
have been updated. In the routines that follow, the F5 
DSCBs and the F4 DSCB are updated to reflect the 
new status of the volume. 


IGG020D1 


1 


Sets up F5 chain pointers, extent counters, and clears 
output area. [SETICCHH] 


Merges extent table entries with the FS DSCBs read 
in. [MERGE!] 


Creates a single extent for each set of contiguous 
extents. [COLLAPSE] 


When an extent (or extents) in the extent table 
overlaps all or part of an extent in an FS DSCB, an 
error code is set, then the extents are merged. The 
error code causes the DIRF bit to be left on in the F4 
DSCB. [OVERLAP] 


Determines when to write an FO or an FS DSCB. 
[OUTPUTI1] 


Converts the RTA1/RTA2 extents to XXYYZ, then 
links to a subroutine that writes the FS DSCBs to the 
VTOC. [DADSMOUT] 


Modifies the channel program and links to a 
subroutine that reads in an F5 DSCB, then links to a 
second subroutine that converts the F5 extents from 
XXYYZ to RTA1/RTA2. [DADSMIN] 


Converts the F5 extents from XX YYZ to 
RTAI/RTA2 format. [CVTORTAO] 


Determines when it is necessary to find the address of 
an FO DSCB, when a new F5 DSCB is created. 
[FINDHOLE] 


IGG020P3 


6 Tests for error entries and if a permanent I/O error 


has occurred, the F4 DSCB is not rewritten. [BEGIN] 


The DIRF bit is set/reset and tested, if a previous 
interrupt has occurred, the F4 DSCB is not written 
back to the VTOC. [TESTDIRF] 


Determines whether overlapping extents were 
encountered (extents to be released already existed in 
the FS DSCBs). [XTENTEST] 


Sets up channel program, then writes the F4 DSCB. 
[WRTF4] 


C 


When entered from Checkpoint/Restart, this routine 
dequeues the data set name (SYSDSN) if it had been 
enqueued exclusively. [NOWRT] 


Dequeues from VTOC. [DEQVTOC] 


If I/O errors or overlapping extents were encountered, 
issues message IEC603I. [BUILDMSG] 


Frees work areas obtained during previous processing 
and restores the work area DEB if RPS feature is 
present on device. Determines caller and returns. 
[RPSTEST] 


Return Code: 


Code Meaning 

0 No errors detected. 

2 Unable to find extent in F! DSCB. 
4 Unable to find extent in F3 DSCB. 
8 Data set is open. 

16 Permanent I/O error. 

32 No space in VTOC. 
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Diagram 24. Rename Data Set 
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8a If RACF-defined, renames definition and 


ue? 


10 Renames data set: Changes old name to new 


by passes password checking 


verifies password 


name in Fl DSCB and writes modified 
F 1 DSCB and dequeues VTOC 


volumes that contain the data set? 


12 Dequeues on data set name and TIOT 


13 Frees work areas, loads completion code 


S» 


Registers passed to Open/EOV 
Password Protection 


R1 R10 
tf DSAB 02 00 00 00 
R4 


ee DSCB, 
data portion 


RS 
t IOB 


R11 


sO ld data 
set name 


Rename 


|B Status 


Code 


Device | Volume serial 
code num ber 


R15 


c 


Completion Code 


€O[ UoNeIsdO Jo poyyop 


C 


Extended Description for Diagram 24 


The Rename function is entered from the SVC SLIH 
as a result of the issuance of SVC 30, which ts part of 
the expansion of the RENAME macro. Its purpose is 
to rename data sets, which is done by changing the 
data set name field of the Fl DSCB. 


IGC00030 
1 Issues the IECRES GET macro to get the Rename 


work area (see OS/VS2 Open/Close/EOV Logic fora 
description of the IECRES macro). [BEGIN] 


Checks for a caller executing in supervisor state or ina 
system storage protection key (key 0 through 7). If 
neither, branches to the resident address validation 
routine (IEAOVLOO) to verify that the volume list 
passed by the caller has the same protection key as 
indicated in the TCB. [VALCHECK] 


Attempts to enqueue on the TIOT using the resource 
name SYSZTIOT. If the resource in not available, the 
data set is in the process of being opened or closed and 
therefore cannot be renamed. [BYPASS] 


When the caller passes the address of a UCB in 
register 0, searches the DSAB chain for a TIOT DD 
entry that contains this UCB address. This search will 
verify that the unit associated with the UCB is 
allocated to the job. If the unit is allocated to this job, 
verifies that the volume on the device is eligible for 
demounting. [USERSUCB] 


When no UCB address is passed, or when the UCB 
address passed represents a device that is not allocated 
to the job step or contains a volume that is not eligible 
for demounting, this routine searches the DSAB chain 
for a TIOT entry whose UCB contains the volume 
serial number of a volume in the volume list (to 
determine if any volume in the volume list is mounted 
on a unit allocated to this job). If so, this routine 
verifies that the UCB represents a volume that is 
on-line and available for demounting. [FINDUNIT] 


Checks for requests to rename a VIO data set, which is 
not allowed. If such an attempt is made, this routine 
terminates Rename processing. [VIODSTST] 


Attempts to enqueue on the data set name using the 
resource name of SYSDSN. If the resource is not 
available for exclusive control, the data set is allocated 
to this or another address space and cannot be 
renamed. [DSNAMENQ] 


When there are no entries in the volume list, when the 
validity check of the volume list address fails, or when 


C 


the data set to be renamed is either open or a VIO 
data set, this routine frees the Rename work area and 
returns to the caller with an error indication in register 
15. [EXIT] 


1GG03002 
5 Before searching the TIOT, builds a DEB/DCB and 


IOB with the information required by IOS to read 
from the VTOC. [BEGIN] 


Searches the DSAB chain for a TIOT entry whose 
UCB contains the volume serial number of the current 
volume-list entry. [FINDUCB] 


If the current entry in the volume list is not mounted 
on a device allocated to the job, searches the UCB 
look-up table for a UCB with a volume serial number 
that matches the volume serial number of the current 
entry in the volume list. [TABLSRCH] 


If the current volume list entry was found on an 
unallocated unit, builds the request blocks required to 
dynamically allocate the unit. Issues the DY NALLOC 
macro to request that the unit be allocated to this job. 
[ALLOCVOL] 


If the volume was not mounted on any unit or if the 
dynamic allocation request was unsuccessful, requests 
that the volume be mounted on a demountable, 
available unit. [MOUNTVOL] 


IGGO300F (alias for IGGO290F) 


6 Determines if the unit associated with the UCB is 


eligible for demounting. [MNT00100] 


If another volume is to be mounted after the current 
volume is demounted, enqueues on the volume serial 
number of the next volume. [MNT00200] 


Calls a subroutine that builds the demount message 
IEC502E, then completes the message and calls 
another subroutine that issues the message. 
[MNT00400] 


Builds the demount message. If the “MONITOR 
SPACE” command was issued or if demounting 
activity is being monitored for SMF, issues SVC 78 
(LSPACE, see Diagram 26) to gather information 
about the space available on the volume for the 
demount message or for recording in the SMF data set 
(record type-19). Also issues SVC 98 (VOLSTAT) to 
write a volume Statistics record on the SYS!.LOGREC 
data set. [MNT 1 1000] 


oe C 


Calls a subroutine that sets the mount bit in the UCB. 
Builds and issues a mount message IEC601D. If the 
UCB indicates both an MSS virtual volume and a 
JES3-managed unit, builds an SSOB and passes it to 
JES3 via the IEFSSREQ macro for mounting 
approval. Upon approval, issues SVC 126 by use of th: 
ICBMNTDE macro to mount the virtual volume. 
Upon disapproval, loads the return code of 8 into 
register 15, dequeues from the volume serial number 
(resource name is SYSZVOLS), and returns to the 
calling routine. [MNT03000] 


If the UCB indicates an MSS virtual volume that is not 
JES3-managed, issues SVC 126 by use of the 
ICBMNTDE macro to mount the virtual volume. 
[MNT03005] 


Also issues a TPUT macro to write message IEC 108] 
to the TSO terminal. [MNT03010] 


Builds and executes a channel program to read the 
volume label (record 3 of track 0, cylinder 0), then 
calls a subroutine that resets the mount bit in the 
UCB. [MNT04000] 


If the operator mounted the wrong volume, branches 
to a subroutine that builds and issues a message telling 
the operator that the volume is not accepted. 
[MNT04200] 


Calls a subroutine that converts the actual device 
address (CCHHR) of the VTOC to a relative track 
address (TTR), then moves the TTR of the VTOC and 
the volume serial number to the UCB. [MNT05000] 


Updates the volume disposition in the UCB for the 
newly mounted volume. [MNT05100] 


Loads the return code in register 15, dequeues from 
the volume serial number (resource name Is 
SYSZVOLS), and returns to the calling routine. 
[MNT01500] 


IGG03001 
8 Tests for a return from the Open/EOV password 


protection function (SECLOADA); if not entered 
from SECLOADA, enqueues on the VTOC by issuing 
a RESERVE macro. Next, searches the VTOC fora 
F1 DSCB that has the new data set name (a 
duplicate-ename DSCB). [BEGIN] 


Calls a subroutine that reads the F!1 DSCB of the data 
set to be renamed (the old data set name is pointed to 
by the second word of the Rename parameter list). 
[INAMEOKAY] 
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Extended Description for Diagram 24 (Continued) 


8a 


If the enqueuing of the data set name indicated that 
some task may be open to the data set being renamed, 
this routine examines the extents in each of the DEBs 
associated with this job to verify that no task is 
currently open to the data set to be renamed. 
[FIFOUND] 


If data set is RACF-indicated, checks user 
authorization to rename data set by issuing a 
RACFDEF for ALTER authorization. If not 
authorized, sets error code=8; otherwise issues 
RACDEF TYPE=DEFINE, NEWNAME= to change 
name of RACF definition. If not successful, sets error 
code of 8. If successful, bypasses password checking. 
[PSWDCHK] 


The RACDEF TYPE=DEFINE, NEWNAME macro 
instruction is bypassed for RACF-defined data sets if 
both the JSCBPASS bit and the second bit of the 
second byte of the RENAME parameter list are set to 
1. 


If data set is RACF-indicated, checks user 
authorization to rename data set by issuing a 
RACDEF for ALTER authorization. If not 
authorized, sets error code=8; otherwise, issues 
RACDEF TYPE=DEFINE, NEWNAME= to change 
name of RACF definition. If not successful, sets error 
code of 8. If successful, bypasses password checking. 
[PSWDCHK] 


This routine determines if the data set is password 
protected. If so, passes control to the SECLOADA 
module of the Open/EOV password protection 
function. (See OS/VS2 Open/Close/EOV Logic fora 
description of this function.) [CHECKPSW] 


10 When the password has been verified or when the data 


11 


set to be renamed is not password protected, the new 
data set name is written over the old data set name, 
and the F1! DSCB is written back to the VTOC in its 
original location. [PSWDOKAY] 


Dequeues the VTOC. [FINISH] 


If the unit on which the renamed data set resides was 
dynamically allocated, builds the request block 
required to deallocate the unit and issues the 
DYNALLOC macro (SVC 99). [TSTALLOC] 


Determines if all entries in the volume list have been 
processed. If there are unprocessed entries, gives 
control to IGG03002 to process the next volume list 
entry. [TESTLAST] 


IGG0300F (alias for IGG0290F) 


= 


Calls a subroutine that builds the demount message 
IECSO02E, completes the message and calls another 
subroutine that issues the message. [MNT00400] 


Builds the demount message. If the “MONITOR 
SPACE” command was issued or if demounting 
activity is being monitored for SMF, issues SVC 78 
(LSPACE, see Diagram 26) to gather information 
about the space available on the volume for the 
demount message or for the SMF data set (record 
type-19). [MNT 11000] 


I1GG03001 


12 Dequeues the data set name if it was enqueued for 
exclusive control (resource name is SYSDSN). 
[DEQTESTZ2] 


Dequeues from TIOT. [DEQTEST3] 


When Rename processing is successful on one or more 
volumes, determines if SMF information is being 
gathered. If so, builds and writes an SMF type-18 
record, which describes renamed data sets. 
[TESTSMF] 


13 When all the volume list entries have been processed, 
frees the Rename work area, puts a return code in 
register 15, and returns to the caller. [EXIT] 


E+ completion Code: 


Code 
0 
4 


Meaning 
Successful completion. 


No volumes containing any part of the data 
set were mounted, nor did register 0 contain 
the address of a unit that was available for 
mounting a volume of the data set to be 
renamed (this completion code is 
accompanied by a setting of 5 in the Rename 
status code of each entry of the volume list). 
The data set may be a VIO data set, which 
cannot be renamed. 


An unusual condition was encountered on 
One or more of the volumes. 


The volume list passed to Rename was not 
valid (this return code is not accompanied by 
the setting of a Rename status code in the 
volume list). 


Code 


0 


Bi Rename Status Code: 


Meaning 


The F1 DSCB for the data set has been 
renamed in the VTOC on this volume. 


The VTOC of this volume does not contain 
the F1 DSCB of the data set to be renamed. 


The data set could not be renamed because 
the data set was password protected and the 
password was not supplied in the two 
attempts allowed, or an attempt was made to 
rename a VSAM data space. 


An Fl DSCB containing the new data set 
name already exists in the VTOC of this 
volume. 


A permanent I/O error or an invalid F1 
DSCB was encountered while trying to 
rename the data set on this volume. 


It could not be verified that this volume was 
mounted nor was there a unit available for 
mounting the volume. 


The operator was unable to mount this 
volume. If the volume is an MSS virtual 
volume and is running in a JES3 
environment, JES3 would not allow the 
volume to be mounted. 


The data set was not renamed because it was 
currently open for processing. 


The data set is defined to RACF but either 
the accessor is not alter authorized to the 
data set or the data set is defined to RACF 
on multiple volumes. 
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Diagram 25. Obtain 
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Extended Description for Diagram 25 


The Obtain function is entered from the SVC SLIH as 
a result of the issuance of SVC 27, which is part of the 
expansion of the OBTAIN macro instruction. Its 
purpose is to read a DSCB from the VTOC of a 
specified volume into virtual storage. For VIO data 
sets, its purpose is to retrieve a virtual DSCB from the 
SWA; for VSAM data sets its purpose is to retrieve 
equivalent information from the catalog. 


IGC0002G 


1 


Issues the IECRES GET macro to get the Obtain work 
area (see OS/VS2 Open/Close/EOV Logic fora 
description of the IECRES macro). [BEGIN] 


Checks for a caller executing in supervisor state or ina 
system storage protection key (key 0 through 7). If 
neither, branches to the resident address validation 
routine (IEAOVLO00) to verify that the volume list 
passed by the caller has the same protection key as 
indicated in the TCB. [VALCK] 


If the search option is specified, determines whether 
the volume serial number passed in the volume list 
represents a VIO data set. If so, only a virtual UCB 
will be present. If (1) this is not a virtual DSCB for a 
VIO data set or (2) the seek option is specified, this 
routine searches the UCBs (using the UCB look-up 
table) for the UCB with a volume serial number that 
matches the volume serial number passed in the 
volume list. [ADDROK] 


When the appropriate UCB has been located, builds a 
DEB/DCB, IOB, and ECB. The F4 DSCB address is 
picked up from the UCB, converted from TTR to 
MBBCCHHR, and stored as the seek address. 
[BUILDEB] 


If the search option is specified, searches the VTOC 
for the Fl or F4 DSCB with the specified data set 
name, and when found, moves the data portion of the 
DSCB and its actual device address into the caller’s 
work area. [SRCHDSCB] 


For VIO data sets, enqueues exclusively on the TIOT 
(resource name is SYSZTIOT). Searches the DSAB 
fora TIOT DD entry containing a virtual UCB whose 
virtual DSCB contains the data set name being 
obtained and whose volume serial number matches the 
volume serial number in the parameter list. If a 
matching data set name and volume serial number is 
found, moves the data portion of the virtual DSCB 
from the scheduler work area (SWA) into the caller's 
work area and dequeues from the TIOT. [VIODSTST] 


C 


6 When the seek option is specified, relocates a channel 


program to read the F4 DSCB, moves the extent 
containing the VTOC (DS4VTOCE field) to the DEB, 
and verifies that the seek address passed is within the 
VTOC. Reads the DSCB and moves it into the caller’s 
work area. [SEEKDSCB] 


Issues the IECRES FREE macro to free the Obtain 
work area and returns to the caller with a return code 
in register 15. [LEAVE] 


When the search option is specified and no F1 DSCB 
can be found, passes control to IGC0102G if the 
DS4AMCAT field of the F4 DSCB indicates that there 
is a VSAM data space on the volume. [NODSCB] 


IGC0102G 


Constructs a catalog parameter list and calls catalog 
management to find the named data set in the master 
catalog or in a VSAM user catalog. If found, formats 
the data portions of an F1 DSCB in the caller’s work 
area, then returns to the caller with a return code in 
register 15. [IGCO102G] 


Search or Seek Code: 


Code Meaning 
X‘C1 00 00 00’ Search 
X‘CO 80 00 00’ Seek 
B | Completion Code: 
Code Meaning 
0 Successful completion of Obtain routine. 
4 The required volume was not mounted. 
8 The F1 DSCB was not found in the VTOC 


of the specified volume. 


12 A permanent I/O error or an invalid F1 or 
F4 DSCB was encountered when processing 
the specified volume. 


16 The pointer to the work area passed by the 
caller was invalid. 


20 The absolute address passed (seek option) 
was not within the boundaries of the VTOC. 
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Diagram 26. LSPACE 


RO 
OQ, 
R1 


t MONITOR SPACE message area. 


Three low-order bytes will 
be zero if no MONITOR 
SPACE message is required 


SMF Code: 

00 — SMF not required 

40 — SMF may be re- 
quired; further 
testing necessary 

80 — SMF required 


——— ea 1 Validates input 


Entered via 
SVC 78 


2 Gets LSPACE work area; builds control blocks 
and channel programs 


S@ED 3 Reads F4 and first FS DSCBs 


4 Accumulates extent, cylinder, and track informa- 
tion from F5 DSCBs 


5S If SMF information is required, reads volume 
label and builds type-19 record. Writes record 


6 If “MONITOR SPACE” message required, 
builds message 


Rl 
7 Releases LSPACE work area, loads completion | 
code and “‘MONITOR SPACE” message pointer 


R15 


= 


Completion 
Code 


—__ 
Waeacagl 


MONITOR SPACE 
Message Area 
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C Lo 


Extended Description for Diagram 26 


The LSPACE function is entered from the SVC SLIH 
as a result of the issuance of SVC 78. Its purpose is to 
calculate the amount of available space on a given 
volume. SVC 78 is issued by routines that provide 
available-space information when a volume is to be 
demounted. SVC 78 is also issued to gather 
information for an SMF type-19 record. 


1GC0007H 


1 Validates SMF indicator; checks for a caller running in 


a system storage protection key (keys 0 through 7) or 
supervisor state and, if neither, branches to the 
validity checking routine to verify that the beginning 
and ending addresses of the message area have the 
same protection key as the TCB for this task. 
[BEGIN] 


Validates UCB address. [UCBADDR] 


Gets a work area for LSPACE processing and builds a 
DEB/DCB, IOB, and ECB in the work area. 
[BEGINC] 


Converts TTR of the F4 (VTOC) DSCB to 
MBBCCHHR. Relocates the channel program to the 
LSPACE work area and initializes it to read the F4 
DSCB and the first FS DSCB. Issues a RESERVE 
macro instruction to enqueue the VTOC. [GOCVT] 


When (1) the UCB address passed in register 0 is not 
for a direct-access device, (2) an invalid parameter is 
passed in the LSPACE parameter list, or (3) the UCB 
represents a device that is not ready, sets up the error 
message, frees the work area, loads a completion code 
in register 15, and returns to the caller. [EXIT] 


FY*Completion Code and Resultant Message: 


Code Message 

0 None 

4 LSPACE—PERMANENT I/O ERROR 

8 LSPACE—NON-STANDARD OS VOLUME 


12 LSPACE—INVALID PARAMETER (or) 
LSPACE—NOT A DIRECT-ACCESS 
VOL (or) LSPACE-UCB NOT READY 


16 None 


C 


1GC0107H 
3 Reads the F4 and first F5 DSCB. [BEGIN] 


4 Relocates the channel program to read subsequent F5 
DSCBs. [SETNXT] 


Totals the cylinders and tracks in the F5 extents; saves 
the largest extent encountered; counts the number of 
extents. [ADDIN] 


Checks to determine if all FSs on VTOC have been 
read; if not, branches to read the next one. 
[CHECKOUT] 


5 Tests for SMF requirements, and, if required, modifies 
channel program to read the volume label and 
branches to the routine that reads the label. 
[TESTSMF] 


Builds type-19 SMF record (see OS/VS System 
Management Facilities (SMF) for a description of the 
type-19 record). Writes the record. Tests to determine 
if a ‘MONITOR SPACE” message is required. 
[BLDSMF] 


6 When “MONITOR SPACE” message is required, 
links to a routine to unpack and convert to decimal the 
information required, then moves the message to the 
30-byte message area. [INITCVT] 


Dequeues the VTOC, tests for error exits and sets up 
error messages, if required. [SETDEQ] 


7 Frees the LSPACE work area, loads the completion 
code into register 15, loads the message location into 
register [, and returns to the caller. [FREE] 


Condition 

Successful LSPACE processing 

I/O error while reading DSCBs 

Last allocation on this volume made under DOS 


UCB address invalid 
UCB not for direct-access device 
UCB-not-ready bit is on indicating device not ready 


Invalid message area address or SMF indicator 
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Diagram 27. Protect 


Rl 


Protect parameter list 


No. Volume 
volumes | f list 


Details on the length and 
contents of this list are 
presented in OS/VS 2 
Sustem Programming 
Library. Data Managemem 
Volume list 


Volume serial 1 


‘Volume serial on 


For add, delete, or 
replace functions, when 
the data set to be pro- 
tected is not cataloged. 
a list of volume serial 
numbers on which the 
data set resides must 

be provided 


R6 


[__ 


UCB Look-up 
4 Table 


Entered 

via SVC 98 
1 
2 
3 
4 
5 


R15 


Completion 


Gets work area; validates parameter list; Code 
issues an OBTAIN macro to read the F1 
DSCB of the PASSWORD data set; builds 
control block for IOS 


Add, delete, replace, or list processing of 
the PASSWORD data set 


BZ 


ye ASSWORY 
—”’ Wdata set 


Writes updated F]1 DSCB for PASSWORD 
data set back to VTOC 


If control password is processed, updates F 1 
DSCB of the protected data set on all volumes 
of the data set 


protected data set 


Restores registers, frees work areas, and returns BRI4 
to caller 


C C | 2 


status is required, an exit is taken via BR 14. 
[FLAGDS] 


When the protection status bits must be modified, 
enqueues the VTOC, reissues the OBTAIN macro 


indicator, and optional, 77-byte data field are read 
into the buffer provided by the requestor. [LST010] 


When a new record is to be added to the end of the 
PASSWORD data set, sets up the IOB seek field of the 


Extended Description for Diagram 27 
IGC0009H 


1 Gets a work area for building I/O supervisor control 
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blocks and reading in the Fl! DSCB for the 
PASSWORD data set. Validates the parameter list 
pointed to by register 1. Validates parameter list 
entries. [INITCOR] 


Determines if a PASSWORD data set entry is to be 
added, replaced, deleted, or listed. Verifies that the 
buffer address (list request) passed has the same 
storage protection key as the current TCB. [CHK001] 


Sets up a parameter list for enqueuing the 
PASSWORD data set and issues an ENQ macro 
instruction. If an entry is to be added to the 
PASSWORD data set, a second ENQ is issued. 
[CHKEND] 


Determines the record capacity constant of the 


Entered when a record is to be listed, this routine links 
to a subroutine that searches for the specified record. 
The 80 bytes including the counter, protection mode 


last block written to the track. If there is no room to 
write another block to the track, obtains the next track 
address. [ENBLKO10] 


Using the input parameter list, creates the protection 
mode byte for the password being added or replaced. 
For control passwords, an indicator is set to indicate 
F1 DSCB updating. [BLDMD010] 


Creates the 80-byte data field fora PASSWORD data 
set record. [BLDENOI10] 


Searches PASSWORD data set and writes new records 
or replaces records in the PASSWORD data set. 
[SRCH020] 


Error handling routine; loads register 11 with error 


Determines if the protection status bits of the Fl 
DSCB are to be modified. If no change of protection 


instruction, modifies the status bits, writes the Fl 
DSCB back to the VTOC, and dequeues the VTOC. 


[NQ] 


5 Aseach F1 DSCB is written back to its VTOC, checks 
for additional entries in the volume list. Makes 
another pass through this module for each volume list 
entry. When all volume list entries have been 
processed, frees work areas, restores registers 0, 1, and 
15, lands the return address of the calling routine in 
register 14, and returns control to the caller via a 
branch on register 14. [STATUSOK] 


Completion Code: 
Register 15 Explanation 


SYSRES device. Gets a work area (subpool 251) for return code. [ERET040] 0 The rao ii set was 
use by Obtain routine. Issues the OBTAIN macro Exit routine; dequeues the enqueued PASSWORD successiully updated. 
instruction to read in the Fl DSCB for the data set, sets up XCTL ID, and issues SVC 7(XCTL) 4 The password of the data set name was 
PASSWORD data set. Builds control blocks and a to transfer control to IGC0209H. [RET010] already in the PASSWORD data set. 
ance seepage Pacem 8 The password of the data set name was 
1GC0209H not in the PASSWORD data set. 
1GC0109H Tests for error entries and sets up enqueue and 12 A control password is required or the one 
ranch table routes requests based on the contents ; 
of register 10, which were established in the previous If the Fl DSCB for the PASSWORD data set is to be 16 The supplied parameter list was 
routine. [ENT010] updated, enqueues the SYSRES VTOC, updates the incomplete or incorrect. 
DSILSTAR field (address of last block written), and : 
Links to a routine that builds the protection mode links to a subroutine that writes the DSCB back to the 20 There was an I/O error in the password 
indicator byte, then links to a second subroutine that VTOC. The SYSRES VTOC is then dequeued. data set. 
builds the balance of the 80-byte data area. [COM050] [UPDATE] DAex The PASSWORD data set was full. 
Modifies channel program and links to a subroutine When a control password is being changed, checks for 28 The validity check of the buffer address 
that searches the PASSWORD data aS is 44-byte a volume list provided by the user. If no volume list failed. 
name specified in the parameter list. When the data was provided, a LOCATE macro instruction is issued 
set name is found, links to a routine that issues an to create a volume list. [SETFLAG] 32* The LOCATE macro failed. LOCATE's 
EXCP to search for the 44-byte data set name plus the return code is in register 1 andthe _ 
8-byte password. [ADD010] Searches the UCBs for the UCB of a mounted volume number of indexes searched is in register 
7 with a volume serial number that matches the volume 0. 
When a data set name is being replaced, links to a serial number in the volume list. [LOOKUP] , 
subroutine that searches the PASSWORD data set to 36* The OBTAIN macro failed. OBTAIN’s 
; : Issues DYNALLOC (SVC 99) to request allocation of return code is in register 1. 
verify that the new name is not already in the es d device for the data set. [MATCHID] g 
PASSWORD data set. [COM005] Urethane tr aa fea 40* The DSCB could not be updated. 
ae Issues an OBTAIN macro to read in the data portion 
Wh d disb deleted, links t ; 
subrotline that searches for the record (a berdcleted. (last 96 bytes) of the F1 DSCB of the data set being - TRS PASSWORD Ghia set dovemiclieniet 
[COMO010] protected. [GETDSCB] 48* Tape data set cannot be protected. 
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Extended Description for Diagram 27 (Continued) 
Register 15 Explanation 
52* Data set in use. 


56* The data set uses the virtual storage 
access method (VSAM). 


*For these return codes, the PASSWORD data set has 
been updated, but the DSCB has not been flagged to 
indicate the protected status of the data set. 


**For this return code, a message is written to the 
console indicating that the PASSWORD data set is 
full. 


C 


PROGRAM ORGANIZATION 


The DADSM routines are supervisor call (SVC) routines, except for Extend 
and Partial Release. At system initialization, the DADSM routines are made 
resident in virtual storage in 4096-byte pages of the pageable link pack area 
(PLPA). 


The DADSM routines transfer control among themselves using the IECRES 
macro instruction. The IECRES macro is documented in OS/VS2 
Open/Close/EOV Logic. Except for the Partial Release and Extend, the 
DADSM routines return control to their callers using a direct branch. The 
Partial Release routine uses the XCTL macro when returning to 
Checkpoint/Restart. The Extend routine uses the XCTL macro instruction 
when returning to the catalog management routines. 


Charts containing brief module descriptions and the logic that determines 
flow of control among the DADSM routines follow. These charts can be used 
to trace the flow of control, both backward and forward, through the 
DADSM object modules. The figures indicate conditions at exit from each 
object module that passes control, under non-error conditions, to more than 
one other module. 


At the right of each box that represents a DADSM CSECT are register 
settings and work area contents used by each CSECT as input. Immediately 
following the input description is the description of the output from each 
CSECT: register settings, work area contents, and control blocks written to 
direct access storage devices. 
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START Entered via SVC 32 (from 


scheduler, utilities, or VSAM) 


IGC0003B 

Input: RO— JFCB or partial DSCB (if bit 0 of RO = 0, entry was 
from scheduler; if bit 0 of RO = 1, entry was from a utility). 
R1 — fullword location containing a pointer to a UCB or if 
a VIO data set is being allocated, R1 — device code. R2 > 


Allocate — Initialization Entry Point 


Gets work area and builds DEB. If 
RPS feature is present, gets RPS work 
area and loads RPS SIO appendage 

(IGGOI9EK). 


Output: DSAB address list if ISAM data set is being allocated. 


R4# 0,R7— UCB or device code R11 — JFCB or partial 
DSCB, R13 — Allocate work area (DEB/DCB, ECB, IOB). 


V10O Data Set 
: From VTOC 
Conversion 


IGGO325A 
ee : Input: R11— JFCB or partial DSCB, R7 > UCB, R4 = 0 if entered 
pilocate —-Duplicale:FE-DSCk Search from IGG0325Z (VTOC Conversion), R13 — Allocate work 
This module enqueues the VTOC, area (DEB/DCB, ECB, IOB). 


reads in the F4 ae first Sees Output: R13 — Allocate work area (F4 and first FS DSCBs and their 
then searches the F1 DSCBs for data absolute track addresses, duplicate-name F1 DSCB, if found, 


set of the same name as the data set ; 
DEB/DCB, IOB, ECB), R11 — JFCB tial DSCB. 
| being allocated. Checks for DOS ; : ) a ta 


volumes and ISAM data sets. Proc- 
esses for DIRF. 


ISAM data set VTOC in DOS 


to be allocated format or DIRF 
bit set 
Non-ISAM 
datz set or 
VSAM data 
space to be 
is eHOCMED: © ee Cs25z 
IGGO321 to convert VTOC 


to standard format 


16GQ0325B 


Input: R13 — Allocate work area (F4, first FS, DEB/DCB, IOB, 
ECB, channel program), R11 — JFCB or DSCB. 


Non-ISAM Allocate — Request 
“onversion and Type Determination 


| 


Output: Registers same as at input, except R10 = the space requested 
in tracks. A modified channel program will reside in the work 
area. 


this module converts requests in 
cylinders and average records (blocks) 
to tracks, calculates the TTRLL field 
and directory size for RPAM data sets, 
determines the type of request and 
transters control accordingly. 


Note: All modules, except IGCO003B, IGG03251 and IGGOCLI 2. 
passs control to IGGO325H when error conditions are 
encountered: see ““DADSM Allocate Return Codes” for 
error codes and resultant messages. 


Absoiute- Regular Track Zero-Quantity User- 
Track and Cylinder Requests (w/o label 
Request Requests user labels) Requests 


To IGGOI325C To I1GG0325D To IGG0325E To IGG0325K 
Chart i. (Part i of 3) Allocate Initialization and Non-ISAM Allocation 
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From IGG0325B 


IGG0325K 


Non-ISAM Allocate — User-label 
Extent Allocation 


This module allocates a user-label 
extent for all requests except absolute- 
track requests. It allocates a single 
track from the smallest extent in the 
first format-5 DSCB. 


Zero-quantity, 
user-label requests 


IGG0325D 


Non-ISAM Allocate — Search Free 
Space (Normal, Cylinder and Track 
Requests) 


Finds free space in the FS DSCB 
according to the space type requested 
(ALX, MXIG, CONTIG, or no-option- 
specified) and makes entries in the 

extent table for the data set. 


IGG0325C 
Non-ISAM Allocate — Absolute Track 


Processing 


Scarches free space for extent contain- 
ing the absolute track requested; deter- 
mines whether quantity is available at 
that location; handles user-label 
requests (the first track of the extent 
at the absolute track requested is the 
user-label extent). 


IGGO0325E 


Non-ISAM Allocate — Building 
Format | and F3 DSCBs 


Builds I*l and I'3 DSCBs using extent 
table and JFCB or partial DSCB. 


Defines data set to RACI if requested. 
Writes these control blocks to the 
VTOC. Updates some F4 DSCB fields. 


Zero quantity requests All other 


and errors request types 
‘Se To IGG0325H To IGG0325G 
Chart 1. 


From 
1GG0325B 


ie 


From 
IGG0325B 


Zero-quantity 
requests w/o 
user-labels 


From 
IGG0325B 


Input: 


Output: 


Input: 


Output: 


Input: 


Output: 


Input: 


Output: 


Note: 


R13 — Allocate work area (data portion of F4 DSCB 
and first Fs DSCB and their addresses, DEB/DCB, IOB, 
ECB, channel program to read F5 DSCBs), R11 > JFCB 
or partial F1 DSCB. 


R13 — Allocate work area (contents of work area unchanged, 
except user-label extent will be added to the extent table 
and removed from the F5 DSCB), 


R13 — Allocate work area (contents same as IGGO325K 
input), R10 = space requested in tracks, and R11 > JICB 
or partial Fl DSCB. 


Work area now contains extent table entries for allocated 
extents; first FS DSCB may not be in virtual storage. 


Same as input to IGG0325K; in addition, R10 = space 
requested in tracks. 


Ri3— Allocate work area (first 5 may have been 
overwritten with subsequent F5s, extert table contains 
a single entry; otherwise contents of work area unchanged). 


Same as input to IGG0325K; in addition, the work area 
will contain the extents allocated to this request in the 
extent table, if it is not a zero-quantity request; the 
channel program will have been modified to write k 1 
and F3 DSCBs. 


Fl and F3 DSCBs to the VTOC_ Registers and work areas 
are as at input. If directories were requested, the absolute 
track address (CCHH) of the first F' 1 extent will be saved 
in the work area. To IGGO325H for zero-quantity 
requests — R8 = QO; for error conditions, R8 = error code 
(non-zero). 


All modules except IGC0003B, IGG03251, and IGGOCLI-?. 
transfer control to [IGG0325H when error conditions are 
encountered; see ““-DADSM Allocate Return Codes” in the 
Diagnostic Aids section for error codes and resultant message. 


(Part 2 of 3) Allocate Initialization and Non-ISAM Allocation 
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Chart 1. 


Return to 
caller 


IGG0325F 


IGG0325G 


] Non-ISAM Allocate — F5 DSCB 
Updating 


Subtracts the extents in the extent 
table from the extents in the F5 

DSCBs. Writes modified FS DSCBs 
back to the VTOC. 


Normal — From 


IGG0325H 


Non-ISAM Allocate — F4 DSCB 
Updating and Error Handling 


Handles error conditions from prev- 
ious modules. Processes for DIRF; 
writes FO record, if an FS DSCB is 
to be removed from the VTOC; 
writes updated F4 DSCB to VTQOC; 
and, if directories are requested, sets 
up CVOL interface. Otherwise, frees 
work areas, 


No Directory Directory 
requested 


Return to 
caller 


1IGG0325] 


VIO Data Set Allocation 


Builds the virtual DSCB (VDSCB) 
| and returns its address to the caller. 
The VDSCB contains a virtual UCB, a 
work area used by VIO, and an F1 
DSCB with either one or two extents, 
two extents if user labels are requested 


No Directory Directory 
requested 


IGGOCLF 2 


BPAM Directory Formatting 


Formats the directory of BPAM data 
sets into 256-byte blocks with 8-byte 
keys. 


Return to 
caller 


From IGG0325E, 


IGG0325E, IGG0325G 
Error — From I1GG0325A, 
IGG0325B, IGG0325C, 
IGG0325D, 1GG0325E, 
1GG0325G, IGG0325H, 
IGG0325K, IGG0325ST 


From IGC0003B 


Input: 


Input: 


Output: 


Input: 


Output: 


Input: 


Output: 


(Part 3 of 3) Allocate Initialization and Non-ISAM Allocation 
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R13 — Allocate work area (data portion of F4 DSCB, 
absolute address of F4 and first FS DSCB, extent 
table, DEB/DCB, IOB, ECB, channel program to 
search for FO DSCBs and read and write F5 DSAB(s)), 
R11 — JFCB. 


New and/or updated FS DSCBs to VTOC. Registers 
and work areas are as at input. 


R13 — Allocate work area (updated F4 DSCB, 
control blocks and channel program to write to the 
VTOC). 


F4 and FO DSCBs written to VIOC. R15 = return 

code, Device code field now ~VDSCB, R1 = number of 
directory blocks to be written and R2 = blocks/track for 
the particular DA device. 


R7 — device type, R11 — JFCB, and R13 > 
Allocate work area. 


A VDSCB will be built in the SWA and R15 = return 
code. Device code field now —» VDSCB. 


R1 = number of directory blocks requested, R2 = num- 
ber of directory blocks per track, R13 —> Allocate 
work area, 


Formatted directory and return code in R15. 


C 


Entered from 


IGGO3211 
ISAM Allocate — Validity Checking 


Validates ISAM allocation requests 
by verifying (1) duplicate-name 
requests are the second or third of 
a series, (2) requests are in cylinders 
or cylinder equivalents in tracks, (3) 
requests in a series are all in same 
unit (e.g., cylinders), (4) only one 
of each space type in series (prime, 
index, overflow), and (5) that there 
are 4 0 DSCBs on the VTOC. 


IGG03 212 


ISAM Allocate — Free Space 
(F5 DSCB) Search 


Searches the F5 DSCBs for available 
space according to the following 
options: (1) an absolute track address 
on a cylinder boundary or (2) a num- 
ber of contiguous or non-contiguous 
cylinders, 


IGG03213 


ISAM Allocate — Building F1, F2 
and F3 DSCBs 


Checks for an F1 DSCB in work 
area (valid duplicate-name request), 
and if present, transfers control to 
1GG03214. Defines data set to 
RACH. Build F'1 DSCB, except for 
extents, then checks for embedded- 
index request; if present, transfers 
control to IGG03215. If not present, 
completes 1, and builds F2 and F3 
DSCBs, as required. 


Embedded 
Index 
Request 
Valid Duplicate- 
GL name F1 DSCB 


To IGG032I5 To 1GG03216 


IGG03214 


ISAM Allocate — Valid Duplicate- 
name F1 DSCB to be Modified 


Modifies existing F1 DSCB and 
builds an F3 DSCB if more than 3 
extents are needed, No F2 will be 
built, because it will have been built 
in a previous pass. The F2 and F3 
DSCBs are chained as required and 
written to the VTOC. 


To IGG03216 
Chart 2. (Part 1 of 2) ISAM Allocation 


IGGQ325A (initial entry) 
or 1GG03218 (multivolume 
data set allocation) 


Input: 


Output: 


Input: 


Output: 


Input: 


Output: 


Input: 


Output: 


Note: 


R11 — JFCB, R13 — Allocate work area (ADSABLST —> 
list of DSABs, address of F4 DSCB, first FS DSCB, F1 
DSCB if a duplicate-name F 1 DSCB was found, DEB/DCB, 
IOB, ECB, channel program). 


Registers and work area asat input; in addition, the work 
area now contains the amount of space requested on this 
track request is being processed. ATIOTPTR current 
entry in TIOT. 


Same as output from 1GG032I1 


Registers as at input. One or more extent table entries will 
now be contained in the extent table in the work area 
(DADSMTBL) and the first FS DSCB may or may not be 
in the work area. 


Same as Output from IGG03212 


To IGG03216 — work area is as at input. An F1 DSCB 
(and F2 and F3 DSCBs, as required) will have been written 
to the VIOC. 

To 1GG03214 — the valid duplicate-name F1 DSCB will be 
contained in the work area, which is as at input. 

To IGG032I5 — A new F1 DSCB, except for extents, will 
have been built in the work area, 


R13 — Allocate work area (valid duplicate-name F1 DSCB, 
extent table with one or more entries, F4 DSCB, DEB/DCB, 
IOB, ECB), 


Updated F1 DSCB and an F3 DSCB if one is needed. Work 
area contents as at entry. 


All modules transfer control to 1GG032I7 on error condi- 
tions; see ““DADSM Allocated Return Codes” for the error 
codes issued by each module and the resultant messages. 
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1GG032I5 


ISAM Allocate — Embedded Index 
Processing 


Completes extents of I'l] DSCB (and 
builds F3 DSCB if one is needed). 
Defines data set to RACF. Builds 
J°-2 DSCB and chains it to the F1 
(and the I°3 to it if there is an F3). 
Writes the DSCBs to the VTOC and 
modifies the channel program to 
read 1'5 DSCBs. 


1GG03216 


ISAM Allocate — Update F5 (Free 
Space) DSCBs 


Searches sequentially through all F5 
DSCBs for the extents that contain 
the extent table entries. Determines 
whether the extent table entry is to 
be removed from the beginning, 
middle, or end of the FS extent. 
Builds new F5 DSCBs, as required. 


1GG03217 


ISAM Allocate — F4 DSCB Updating 
and Error Handling 


Checks for error entries, processes for 
DIRF, checks for multivolume 
requests and, if present, transfers con- 
trol to IGG03218 if more volumes 

are to be processed, If allocation is 
complete, DEQs VTOC, restores 
TIOT, frees work areas, loads com- 
pletion code and returns to scheduler. 


Allocation complete 


Or error exit 
More volumes 


to process; 
multivolume 
data set allocation 


Return to Caller 


1IGG03218 


ISAM Allocate — Multivolume Data 
Set Initialization 


Performs many of the same functions 
of Allocate initialization routine:reads 
F4 and first FS DSCBs, searches 
VTOC for duplicate-name F 1 DSCB, 
and validates the F1, if found. 
Processes for DIRF. 


To IGG032I1 


Chart 2. (Part 2 of 2) ISAM Allocation 


From IGG03213 


From 
1GGQ3 213 
or 

IGG03214 


Input: 


Output: 


Input: 


Output: 


Input: 


Output: 


Input: 


Output: 


R13 — Allocate work area (new F1 DSCB, except for 
extents, extent table with one or more entries, F4 DSCB, 
DEB/DCB, IOB, ECB, channel program). 


F1 and F2 (and F3 if needed) DSCBs chained and written 
to VTOC. Work area contents unchanged. 


R13 — Allocate work area (extent table with one or 
more entries, F4 DSCB, address of first FS DSCB). 


Updated F5 DSCBs written to VTOC. 


Error entries (from IGG03211, IGG03212, IGG032]3, 
1GG03214, IGG03215, IGG03216, IGG03218) — 

RS5 = error code. Normal entry (from IGG032I6) — 
R5 = 0, R13 —> Allocate work area (F4 DSCB, ECB, 
DEB/DCB, IOB, channel program). 


Updated F4 DSCB written to VTOC. 

To IGG03218 — R13 — Allocate work area. 
R10— DD entry in TIOT. 

To Caller — R15 = completion code. 


R10— DD statement entry in TIOT. R13 — Allocate 
work area (CTR field used to calculate address of UCB 
for this pass, DEB/DCB, IOB, ECB, channel program). 


R1i3— Allocate work area (F4 DSCB, first FS DSCB, 
F 1 DSCB if valid duplicate-name DSCB found, DEB/DCB 
with new UCB pointer in DEB, JOB, ECB). 
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1GG0325Z 
Initialization 


Entered from IGG0325A (Allocate) 
and IGG0553F (Extend) 


Issues message IEC604I. Writes FO Input: R7~>UCB, R13 Allocate work area (F4 DSCB, 
DSCBs over all F6 DSCBs. Builds F5 DEB/DCB, ECB, IOB, channel program). 
DSCB in work area that represents 
ae eee ee anc Output: Same as input, except F5 in work area has been reinitialized. 
: cori Channel program is modified. 
IGG0325P 
Non-split-cylinder Data Set 
Processing Input: R13—>Allocate work area. When entered form 1GG0325Z 
btract work area contains reinitialized FS DSCB. When entered 
eee form IGGO325R, R1 = 0 and Allocate work area contains 
split-cylinder data sets, Expands last Fl] or F3 DSCB read and first F5 DSCB. 
extent entries. 
No split-cylinder Split-cylinder data Output: To IGG0325R — R13 — Allocate work area (F4 DSCB, last 
data sets; only sets to be processed F1 or F3 DSCB read, and first FS DSCB, and CCW 12 field 
one FS DSCB contains number of extents in extent table to be subtracted 
on the VTOC | and the address of the first extent to be subtracted). The 
More than To Allocate work area is also chained, via the work area prefix 
one F5 IGG0325Q to the VTOC Conversion work area(s). To IGG0325Q — 
needed high-water mark (DS4HPCHR field) in the F4 DSCB is now 
From valid. First FS DSCB is now in VTOC Conversion work area 
split-cylinder extension. To IGG0325T — If there is more than one F5 
processing DSCB or if more than one FS DSCB was found on the VTOC 
IGG0325R (IGG0325W) the second and subsequent F5s (or their addresses) will be in 
( F5 DSCB Processing the VTOC Conversion work area extension. 
Creates second through last FS DSCB Input: R13— Allocate work area (F4 DSCB, last F1 or F3 read in, 
in work area. Merges and expands first FS, address of VTOC Conversion work area). 
t ies. df 
Sie apse oui cyl we Output: Registers and work areas unchanged, except R1 = 0. 
extents and for all FS processing for 
split-cylinder extents. 
Non-split-cylinder Split-cylinder 
data sets data sets 
To IGG0325W 
Normal — 
From IGG0325W, 
IGG0325P 
IGG0325T haees 
F5 DSCB Conversion, F4 DSCB From IGG0325Z, 
Updating cc Input: R13— Allocate work area (F4 DSCB)>VTOC Conversion 
3 Converts F5 extents from RTA1/ 1GG0325 R, work area. 
Bee eee OC Re nes | 1GGO325U, Output: Valid FS and updated F4 written to VTOC. R4 = 0 to 
nae 7 a a Ree is ie IGG0325V, indicate reentry to IGGO325A. If the VTOC cannot be 
“DOS cee a Cae 1IGG0325W converted, issues message IEC602I. 
reclaimed” bits in F4 DSCB and Note: All VTOC Conversion modules transfer control to 
writes updated F4 to VTOC. IGG0325T when error conditions are encountered, 
Return to caller To IGG0325A (Allocate) 


*~ —/ or IGG0553F (Extend) 


Chart 3. (Part 1 of 2) VTOC Conversion Routine 
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From IGG0325P 
or IGG0325U 


1GG0325Q 
Find Split-cylinder Data Set Extents 


Reads F] and F3 DSCBs from VTOC 
and locates split-cylinder extents. 
Builds first split-cylinder extent in F6 
DSCB. If first F6 extent has already 
been built, transfers control to 
1GG0325U to build more F6 contents 
or to increment user count. 


All F6 DSCBs 
built 


More F6 extents 
to process 


IGG0325U 


Build F6 DSCBs 


Enters F6 extent or increments data 
set count if extent has already been 
entered. 


F6 extent 
overlaps checked 


1GG0325V 


Check for F6 Extent Overlap 


Checks each F6 extent to determine 
whether it overlaps another F6 extent; 
if so, the extents are merged and the 
data set use-counts are added 
together, 


1GG0325W 


Set Up to Subtract F6 Extents from 
FS; Convert F6 DSCB Extents 


Enters F6 extents, five at a time, in 
extent table; transfers control to 
IGG0325R to subtract the extents 
from the FS DSCBs, Reads next F6 
as required. When all F6 extents have 
been subtracted, converts F6 to 
XXYYZ format and writes out F6 
DSCB in final format. 


Subtract F6 


From 


Split-cylinder 
Extents from F5 processing complete 


To To 
1GG0325R IGG0325T 


Chart 3. (Part 2 of 2) VTOC Conversion Routine 
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IGG0325R 


Input: 


Output: 


Input: 


Output: 


Input: 


Output: 


Input: 


Output: 


Note: 


R13 —<Allocate work area->VTOC Conversion work 
area. From I1GG0325P, Allocate work area contains 

F4 DSCB with valid DS4HPCHR field. From 
IGG0325U, work area contains F4 and first F6 DSCBs; 
Rl =0 to indicate reentry from IGG0325U. 


To IGG0325U — R13 —> Allocate work area (F4 DSCB, 
last F1 or F3 DSCB read, first F6 DSCB). R6 — current 
shared-cylinder entry in extent table. R8 — first F6 
extent, 

To IGG0325W — R13 - Allocate work area (F4 and 
first F6 DSCB). 


From IGG0325Q — R11 -—> JFCB or partial DSCB, 
R13 > Allocate work area (F4 DSCB, last F1 or F3 
DSCB read in, first F6 DSCB), R6 > RTA1/RTA2 
entry in extent table, R8 — first F6 extent. 

From IGG0325V — R13 — work area (F4 DSCB, current 
F6 DSCB), R6 > RTA1/RTA2 of data set, R7 = extent 
number being compared, R8 —> current F6 extent, 

R10 = number of extents in last F6, R1 = 0 to indicate 
reentry from IGGO325V. 


To IGG0325Q — R13 — Allocate work area (F4 DSCB, 
F1 or F3 DSCB being processed, and first F6 DSCBs), 
R1 = 0 to indicate reentry from IGG0325U, 

To IGG0325V — R13 — Allocate work area (F4 DSCB, 
Fl or F3 DSCR being processed, and first F6 DSCBs), 
R6 — RTA1/RTA2 of data set, R7 = extent number 
being compared, R8 —> current F6 extent, R10 = num- 
ber of extents in last F6. 


R13 > Allocate work area (F4 DSCB and F6 DSCB 
being compared), R6 > RTA1/RTA2 of data set, 

R7 = number of the extent being compared, R8 -> cur- 
rent extent, R10 = number of extents in last F6 DSCB. 


Same as input except R1 = 0 to indicate reentry from 
IGGO0325V. 


R13 — Allocate work area. 

From IGG0325Q -- Allocate work area contains F4 and 
first F6 DSCBs, 

From 1GG0325R — first F5 DSCB will also be in the 
work area and R1 = 0. 


To IGG0325R — R13 — Allocate work area (extent 
table entries, F4 DSCB, F6 DSCB, first FS DSCB), 
R1 — parameter list (number of extents to be subtracted 
and -—> first extent). 

To 1GG0325T — R13—Allocate work area (F4 DSCB 
and first FS DSCB). Format 6 DSCBs are in final format, 
F5 DSCBs in temporary format. 


All VTOC Conversion nodules transfer control to 
IGG0325T when error conditions are encountered. 


Entered from End-of-Volume, 
(to extend a data set), VSAM, 
(to extend a data set), or OS 
catalog management (to extend 
1OS catalog) 


IGG0553A 


Extend — Initialization Input; R4— O/C/EOV work area (JFCB of data set to be 
extended, I/O supervisor control blocks, channel 
program), RS— DEB of data set to be extended, 


R10 — UCB, R13 = entry conditions (Diagram 15). 


Data set extensions (secondary alloca- 
tions) are made on the current volume 
or on anew volume. Gets Extend 
work area; if device has RPS feature, 
gets RPS work area and loads SIO 
appendage (IGGOI9EK), Enqueues 
the VTOC; reads in F4 DSCB; per- 
forms a duplicate-name DSCB search 
when an extension is made on a new 
volume; and processes for DIRF 
Checks for a VTOC in DOS format or 
a I’4 DSCB with the DIRF bit on. 


Output: R4-—> O/C/EOV work area (contents as in input, 
plus F4 DSCB). RS — DEB, R11 — Extend work 
area, 


VTOC in VTOC in DOS 
standard format or DIRF 
format bit set 


IGG0553F 


Extend — VTOC Conversion 
Interface Module 


Gets Allocate work area and builds 
1/O supervisor control blocks. When 
control is returned from IGG0325T, 
checks completion code. Reads the 
modified F4 DSCB into the O/C/EOV 
work area. 


From IGG0325T Input: From IGG0553A — same as IGG0553A output. 
(VTOC Conversion) From IGG0325T — R8 = completion code. 


Output: To IGG0325T — R7 — UCB, R13 — Allocate work 
area (F4 DSCB, address of first FS DSCB, DEB/DCB, 
IOB, ECB, channel program, contents of R4, RS, and 
R11). 
To IGG0553G — same as output from IGG0553A. 


VTOC VTOC to be 
converted converted 


To IGG0325Z 
IGG0553G 
3 Input: R4—>0/C/EOV work area (F4 DSCB, address of first 
Extend — Request Conversion FS DSCB, JFCB, DEB/DCB, IOB, ECB, channel 


program for reading from and writing to the VTOC), 


ts1 lind 
Converts requests in cylinders or RS > DEB, R11 —> Extend work area. 


average records to tracks; calculates 
last track written to the data set when 
the extension is to be made of the 
current volume of the data set. 


Output: R12 = space requested in tracks, R13 = relative track 
address of preferred location, R11 — Extend work 
area, R4 ~O/CEOV work area which is unchanged, 
RS DEB. 


IGG0553B 


Extend — Free Space (F5 DSCB) 
Search 


Reads in F§ DSCBs and searches for 
an extent or extents that will fill the 
request, Checks preferred location 
first; if not specified or not available, 
searches for an extent equal to or 
greater than request or builds 5-entry 
pushdown list. Builds extent table. 


Input: See IGG0S53G Output, 


Output: R4— O/C/EOV work area (same as at input, except 
that the extent table will now contain one or more 
entries), R11 — Extend work area, RS — DEB. 


Note: When error conditions are encountered, all extend 
modules transfer control to IGG0553E with entry 
code (or modified entry code) in R13. 


To IGG0553C 
Chart 4. (Part 1 of 2) Extend 
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aL, From IGG0553B 


IGG0553C 


Extend — F1/F3 Build/Update Input: R4 > O/C/EOV work area (F4 DSCB, JFCB, DEB/ 


DCB, IOB, channel program, extent table), R11 > 


If extension is on a new volume, Extend work area, RS — DEB. 
builds F1 (and F3, if required) 

DSCB: adds new volume to RACF 
definition of data set; if on current 


Output: New/updated F1 DSCB (and F3, as required). 
Contents of work areas as at input, R2 —> extent table, 


volumecupdatest | SCE Cbililds R4 > O/C/EOV work area, R11 — Extend work area, 


or updates I*3, if required). Writes 
DSCBs to VTOC. 


IGG0553D 
Extend — Free Space (F5 DSCB) Input: Register and work area same as IGGO0553C output. 
Updating Output: Updated F5 DSCB(s). R4 — O/C/EOV work area 
SuhitaetcOeeHL Abie Gales fom (F4 DSCB; a pointer may be set to indicate where an 


I'5 DSCBs. Searches the F5 DSCB FO DSCB is to be written over an FS DSCB to remove 
: en de 2 it from the VTOC). R11 — Extend work area, 


and removes the allocated extents, 
Writes the updated F5 DSCBs back 
to the VTOC. 


IGGO553E 


Input: R4 —> O/C/EOV work area (F4 DSCB and write-F0- 
annie ~ VFOC (F4) DSCB indicator), R11 > Extend work area, R13 = 0 if no 
pearing error has occurred, 


Handles DIRF termination processing, 
writes F0 DSCB if an F5 is to be 
removed, rewrites F4 DSCB, dequeues 


Output: Updated F4 DSCB written to the VTOC. 
To EOV, VSAM or OS catalog management - restores 


caller’s registers from SVRB estended save area, R13 = 
the VTOC,frees work areas,determines return code. To VSAM — RO and R14 = 0. 


where control is to be returned, and To VSAM — RO and R14 =0. 
transfers control. 


Return to 
caller 


Chart 4. (Part 2 of 2) Extend 
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C Entered via SVC 29 
START from scheduler, utility, 
catalog generation module, 


or problem program. 
IGGO29DU 


Scratch - Dummy Module Input: RO UCB or = 0, RI ~ Scratch 
parameter list (see Diagram 18 for 
Passes control to IGC00021 contents). 


Output: Registers unchanged. 


JGCO00021 
Scratch Ini dalization Input: RO UCB or=0, R1 ~ Scratch parameter 
list (see Diagram 18 for contents). 


Gets Scratch work area, determines Output: R13 — Scratch work area (PRUCBPTR field 
whether a demountable device is — demonstrable UCB). 

available. Ensures that data set to 

be scratched is not allocated to this 

or any other address space. Scratches 

VIO data sets. 


Input: R9— CVT, R10 Scratch parameter list, 


Scratch — UCB Selection From R13 — Scratch work area (VOLNUM = number 
1GG0290D of volumes remaining to be processed and 
Builds DEB/DCB and IOB. Determines or VOLPTR current entry in volume list). 
whether volume is mounted on a unit IGGO290F When reentered from IGGO290F, R14 = code 
allocated to the job. If mounted indicating success or failure of volume 
but not allocated, tries to get it mounting/verificatian. 
allocated. : 
Output: R8~— current entry in volume list. R13 
¢ Scratch work area (DEB contains address of 
= UCB for volume containing data set to be 
Volume Volume Volume cannot scratched). 
mounted to be be mounted; all To IGGO2901 — R2 > DEB, R3 > volume 
mounted volumes processed serial number, R4 = 290E, R11 — UCB. 


To 
IGG0290D 


IGG02901 


2 
(IGG0300F) From IGG0290D 


Input: R2-— DEB, R3 ~ volume serial number of 
volume to be demounted or mounted, R4 = last 
four characters of 1D of module to receive 
control] next, RS = number of volumes to be 
scratched, R8 —~ current entry in volume list, 
R10 Scratch parameter list, R13 — Scratch 
work area, R11 — UCB. 


Output: Register contents are the same as at entry, except 
Volume Volume mounted R14 =a return code. Messages 1F0502E and/or 
demounted and verified IEC601D are written to operator. Message 
IEC1081 is written to TSO terminal. Volumes 
demounted, mounted, and/or verified. 


Scratch — Volume Demounting, 
Mounting, and Verification 


Asks operator or MSS to demount 
and/or mount a volume. Verifies 
that a requested volume is mounted. 


To IGG0290D 


Chart 5. (Part 1 of 3) Scratch 
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Chart 5. 


Reentry from 
SECLOADA 


Input: 
IGG0290A 


Scratch — VTOC Search 


Makes sure data set to be scratched 
is not open. Reads in F4 DSCB and 
F1 DSCB for data set to be scratched. 
For password-protected data sets, 
transfers control to SECLOADA to 
verify password. For SU VS2.03.808, 
checks RACF authorization for 
RACF-defined data sets. Checks 
purge date, unless purge data is 
overridden. 


Note: 


To SECLOADA (O/C/EOV) to 
verify password for password- 
protected data sets 


IGG0299A 


Scratch — DSCB Removal 


Input: 


Deletes RACF definition for RACF- 
defined data sets. Removes F1, F2, 
and F3 DSCBs for data set being 
scratched, by overwriting them with 
FO DSCBs. Lists extents removed 

in extent table. If there are more 
than 16 extents to be scratched, 


sets DOS bit so VTOC will be con- 
verted to standard format at next 
allocation. Processes for DIRF. 
Reads in first F6 DSCB if split- 
cylinder data set is being scratched; 
if DOS bit is set or non-split-cylinder 
data set is being scratched, reads in 
first FS DSCB. 


IGG0290B 


Scratch — Format-6 DSCB Updating, 
Split-Cylinder Data Sets 


Identifies split-cylinder extents in the 
extent table. Locates each split- 
cylinder extent in the F6 DSCBs. 
Decreases the count of data sets 


Input: 


sharing the extent. If count goes to 
zero, adds the extent to the extent 
table. If no split-cylinder extents are 
being scratched, immediately transfers 
control to IGGO290C. 


No extents being 
scratched or DOS 
and/or DIRF bit 

set, 


(Part 2 of 3) Scratch 


Output: 


Output: 


Output: 


From IGG0290E — see IG0290F output. 
From SECLOADA ~— R10 = password status 
code. R13 — Scratch work area (DEB/DCB, 
IOB, ECB, channel program). R8 ~™ current 
Scratch parameter list entry. 


To SECLOADA ~— R1 ~ DSAB, R4 ~™ data 
portion of Fl DSCB, R5 ~ IOB, R10 = X‘03 
00 00 00’ to identify a request from Scratch, 
R11 — data set name. 

To IGGO299A — R13 — Scratch work area 
(DEB/DCB, IOB, ECB, channel program, F1 
DSCB, F4 DSCB, address of first FS DSCB). 


When error conditions are encountered, all 
Scratch modules except IGGO290F set the appro- 
priate error code (if any) in the status byte of the 
current volume list entry and branch to 
IGG0290D. IGG0290F returns to either 
IGG0290E or IGGO290D. 


R8 — current volume list entry, R13 Scratch work 
area (F4 DSCB, F1 DSCB, address of first FS DSCB, 
DEB/DCB, IOB, LCB, channel program). 


F], F2, and F3 DSCBs for data set being scratched’ 
will have been overwritten with FO DSCBs. R13 ~ 
Scratch work area (contents as at input, except it now 
contains extent table entries and the first F6 DSCB if 
a split-cylinder data set is being scratched, or the first 
FS DSCB if a non-split-cylinder data set is being 
scratched). F4 DSCB will have been written a VTOC 
with DIRF bit set. R8 ~ volume list entry being 
processed. 


R8 ~ current volume list entry, R13 — Scratch work 
area (F4 DSCB, first F6 DSCB if split-cylinder data 
sets to be scratched, F5 DSCB if non-split-cylinder 
data set to be scratched, DEB/DCB, IOB, ICB, channel 
program, extent table with split-cylinder extents 
marked with X‘FF’.) 


Updated F6 DSCBs written to VTOC. Extent table 
now contains only free extents (split-cylinder extents 
with the other data sets continuing to reside in the 
extent have been removed from extent table). RI3 ~ 
Scratch work area (F4 DSCB, extent table, first FS 
DSCB, DEB/DCB, IOB, ECB, channel program). 

R8 —~ volume list entry. 
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IGG0290C 


Scratch — FS DSCB (Free Space) 
Updating 


IGG0290D 


Scratch — F4 DSCB Updating, 
Scratch Termination 


More 


to process 


and extent table entries are matched 


Merges extent table entries with F5 
DSCB entries. Reads in F5 DSCBs 


and merged. Updated F5 DSCBs are 
written back to the VTOC. 


any other 


Tests for error entries from previous 
modules, writes updated F4 DSCB to 
VTOC, determines whether all volume 
list entries have been processed and 
whether a volume mounted previously 
must be demounted or relinquished, 
dequeues from all resources, writes a 
type-F7 SMI record if required, and 
frees work areas. 


when error 
condition 


Volume to be RC=4o0r8 


demounted 


volumes 


oy 


Processing 
complete 


Chart 5. 


Return to caller 


IGG029DM 


Scratch — Exit Point Dummy Module 


This module is the exit point from 
SVC29 when a non-volume list scratch 
error is indicated (return code 4 or 8). 


The module passes control using the 
return address in register 14. 


RC = Oor 12 


Return to caller 


(Part 3 of 3) Scratch 


Entered from 


scratch module 


encountered 


Input: 


Output: 


Input: 


Output: 


Input: 


Output: 


R8 ~ current volume list entry, R13 Scratch work 
area (F4 DSCB, first FS DSCB, extent table, DEB/DCB, 
IOB, ECB, channel program). 


Updated F5 DSCBs written back to VTOC. Work area 
now contains only F4 DSCB and I/O supervisor 
control blocks. R8 — current volume list entry. 


R8 > current volume list entry, R13 — Scratch work 
area (F4 DSCB, EROCDE field = error code if an error 
has been encountered in previous processing). 


Updated F4 DSCB written to the VITOC. 

Tocaller R15 = return code 0 or 12. 

To IGGO0290E R10 Scratch parameter list. 
R13 — Scratch work area (VOLNUM = number of 
volumes remaining to process, VOLPER ~ next entry 
in the volume list). 

To IGGO290F R2—> DEB, R3 ~~ volume serial 
number, R4 = 299D, R8 > current volume list 
entry, Ril — UCB, R13 — Scratch work area. 

To 1GG029DM — R1 > Scratch parameter list. 
R14 = return address, R15 = return code 4 or 8. 


R1 — scratch parameter list. 
R14 = return address. 
R15 = return code 4 or 8. 


To caller — 
R15 = return code 4 or 8. 
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— SS a SSS SSS 
Entered trom 

Close and Checkpoint/ 

Restart 


IGGO20P | 
Partial Release — Initialization and Input: R2 + DCB of data set to be released, R4 ad O/C/EOV 
Fl DSCB Updatin work area (data portion of 1 DSCB, JCB of data set 
= to be released, DEB/DCB, LOB, ECB, channel program). 
Gets work area. If RPS device, gets R7 ~ Restart work area (it entered from Restart). 
RPS work area and loads RPS SIO RIO — UCB of data set to be released. 
appendage (IGGOI9I:K). Enqueues : ‘ 
VTOCG, reads in 1'4 DSCB, processes Output: R13 — O/C/E-OV work area (I'l DSCB, DEB/DCB, 
for DIR, ensures that no other DCB 1OB, [:CB, channel program). R11 — Partial Release 
containing last track weitten to the were released). I'4 DSCB will have been written to 
data set, if it is in the 1 DSCB, VTOC with DIRI’ bit set. RS = number of extents in 
enters extent table. Removes I'1 extent table. 
extent(s). 
IGGO20P2 
Partial Release — F3 DSCB Updating Input: See IGGO20P1 output. 
ara s Output: Modified 1-3 written to VTOC, or if all extents were 
si Pe avai De ae released in the £3 DSCB, an FO DSCB will be written 
pains eaten fortran Hie Fe oth over it. TCTIOT will be updated if SMI information 
een 3 DSCB Releases 13 aaharks Pile has been requested. Number of extents remaining on 
1/0 P ing last pack aritten by entering the voluine for this data set will be updated in the F 1 
them aac the extent-table- and remo DSCB in the O/C/EOV work area, RI1 = Partial 
ing fens from the 3 DSCB. Makes Release work area (1/3 DSCB is there is one, I°4 
entry in TCTIOT for SMI-, if required. DSCB, extent table). 
1IGG020D0 Input: = Sce IGGO20P? output: also if R2 contains anything 
Partial Release — Write Back F1 DSCB other than a zero or negative value, an error (other 
than I/O error) was detected in either IGGO20P1 or 
Writes back 1 DSCB, sorts DADSM IGGO020P2. 
entries into ascending order if space : ; , ; 
is being released, relocates channel Output: 1/1 DSCB written back to VTOC, DADSM table sortec 
programs for next load module, reads in ascending order, tirst F5 DSCB read in. R9 = num- 
in first FS DSCB. ber of extents to be released, R11 > Partial release work 
area (first I'S DSCB. l'4 DSCB, sorted extent table), 
R13 — [/O support work area (updated I-1 DSCB). 
IGGO20D 1 
Partial Release — F5 DSCB (Free Input: R11 Partial release work area (1°4 DSCB, first I'S 
DOS or Space) Updating extent table). 
DIRE bit : peed Ue ote Fk 
sea ee Merved relexed-extents intothe 1’ Output: Updated 15 DSCBs to VTOC. 
extents to DSCB(s). Writes updated 15 DSCB(s) 
release to VTOC. 
Input: = Error = R2 - error code (permanent I/O error, no 
aes space in VTOC, extent not found, another DCB is 
IeGO20"° open to the data set). Normal - RII Partial Release 
Partial Release — F4 (VTOC) DSCB work area (updated 1°}4 DSCB), R13) O/C/EOV work 
Updating and Termination area (I'1 DSCB, DEB/DCB, IOB, ECB, channel program). 
Processes for DIRI* and writes up- Output: 1°4 DSCB written to VTOC. Updated I'1 DSCB in 
dated I'4 DSCB to VTOC dequcues O/C/EOV work area. The Partial Release work area will 
VTOC, trees work areas, determines have been treed, as well as the RPS work area, if one 
calling routine, and returns control. existed. 
Note: All Partial Release modules transfer control to IGGO20P3 
when 1/O errors are encountered. IGGO20P1 or 
IGGO20P2 transfers control to IGGO20D0 for all errors 
except 1/0. IGGO20P2 also transfers control to IGGO20D0 
for normal processing. 1GGO20P2 then writes back the 
Return to I'} DSCB to the VTOC and, if an error was detected in 
sallog IGGO2OP1 or IGGO20P2, or if an error occured in 
IGGO20D0, control is transferred to IGGO20P3. 
Chart 6. Partial Release 
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C 


START Entered via SVC 30 


IGGO30DU 


Rename — Dummy Module 
Passes control to IGCQ0030 


IGC00030 


Rename — Initialization 


Gets Rename work area. Determines 
whether a demountable device is 
available, Ensures that data set to be 
renamed is not allocated to this or 
any other address space. 


Error 
condition 


From [GG0300F 
or IGG03001 


Return to 
caller 


IGG03002 
Rename — UCB Selection 


Builds DEB/DCB and JOB. Deter- 
mines whether volume is mounted 
ona unit allocated to the job. If 
mounted but not allocated, attempts 
to get it allocated. 


Volume to 
be mounted 


Volume mounted or 
volume cannot be 

mounted, all volumes 
processed 


From IGG03001 
IGG0290F (IGGO300F) 


Rename — Volume Demounting, 
Mounting, and Verification 


Asks operator or MSS to demount 
and/or mount a volume. Verifies that 
the required volume is mounted. 


Volume 
mounted 


Volume 
demounted 


Reentry from 
IGG03001 SECLOADA 


Rename — Fi DSCB Updating 


Reads Fl DSCB, verifies that data set 
may be renamed for RACF-defined 
data sets; writes Fl DSCB with new 
name to VTOC; determines whether 
all volume list entries have been 
processed; dequeues from al] 
resources, writes a type- 18 SMF 
record, if necessary, and frees work 
areas. 


More volumes Volume 
to process to be 
demounted 


Processing 
(21) complete 


To SECLOADA 
(O/C/EOV) to 
verify password 
for password- 
protected 
data sets 


Return to 
caller 


Chart 7. Rename 


Input: 


Output: 


Input: 


Output: 


Input: 


Output: 


Input: 


Output: 


Input: 


Output: 


R1 ~ Rename parameter list (see 
Diagram 24 for contents) RO > WCB 
or = 0. 


Registers unchanged. 


Rl — Rename parameter list (see Diagram 24 for 
contents), RO — UCB or = 0. 


RI — CVT, R10 — Rename parameter list, 

R13 — Rename work area (PRUCBPTR field >UCB 
representing a demountable volume), R15 = error 
code, if an error was encountered. 


R9 —> CVT, R1O — Rename parameter list, 

R13 — Rename work area (VOLNUM = number 
of volumes to be processed, VOLPTR —> current 
entry in volume list). When reentered from 
IGG0290F, R14 = code indicating success or failure 
of volume mounting/Vverification. 


R8 — current volume list entry, R9 > CVT, 

R10 — Rename parameter list. 

To IGG0300F — R2 — DEB, R3 => volume serial 
number, R4 = 3002, R11 > UCB, RI13> 

Rename work area. 


R2 — DEB, R3 — volume serial number of volume 
to be demounted or mounted, R4 = last four 
characters of ID of module to receive control next, 
R5 = number of volumes to be renamed, R8 —cur- 
rent entry in volume list, RIO —~ Rename 
parameter list, R13 — Rename work area. 


Register contents are the same as at entry, except 
R14 = a return code. Messages IECS502E and/or 
IEC601D are written to operator, and message 
IEC108I is written to the TSO terminal. Volumes 
demounted, mounted, and/or verified. 


R8 — current entry in volume list, RIO — Rename 
parameter list, R13 —» Rename work area (DEB/ 
DCB, IOB, ECB, channel program). SMF record 
type-18 to SMF data set. 

From SECLOADA — R10 = password status code, 
R13 —Rename work area (OLDPLPTR— Rename 
parameter list). 


To SECLOADA-— R1 —> DSAB, R4 — data portion 
of Fl DSCB, RS — IOB, RIO = X‘02 00 00 00’ 
to identify Rename request, R11— old data set name, 
R13 — Rename work area. 

To IGG0300F (volume to be demounted) — R2 > 
DEB, R3—> volume serial number, R4 = 3001, R117> 
UCB, R13— Rename work area. 

To JGG03002 (more volumes to process) — rename 
Fl DSCB has been written to VTOC, R10>volume 
list. 

Return to caller — R15 = completion code. 
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Entered via SVC 27 
START from system and 
problem programs 


Input: Rl > Obtain parameter list (option code,— to data 
set name or to absolute track address, volume 
serial number, 140-byte work area provided by 

IGC0002G caller). 
Obtain Output: ~~ Search option — data portion of named DSCB and 
address (CCHHR) of DSCB. Seek option — key and 
Reads a DSCB from the VTOC: data protion of DSCB. R15 = return code. 
searches VTOC for a named F1 
DSCB or reads key and data field 
located at a given actual device 
address (CCHHR) or moves data 
field of a VIO data set’s DSCB. 
No F1 DSCB 
found; VSAM 
data space on volume 
IGCO102G 
Input: R10— obtain parameter list (option code>data 
set name,—> volume serial number, 140-byte 
Retrieves data set description and work area provided by caller); R13 > Obtain work 
physical extent information for a area. 
VSAM data set from the VSAM 
catalog. Moves the extent Output: Data portion of named DSCB. R15 = return code. 


descriptions to the caller’s work area, 


Return to 
caller 


Chart 8. Obtain 
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C 


Entered via SVC 78 
START 


IGC0007H 


LSPACE -— Initialization and Input 
Validation 


Validates input, gets work area, 
builds control blocks, enqueues 
VTOC, If error conditions are 
encountered, frees work area and 
returns to caller, 


Error 
Condition 


IGC0107H 


LSPACE — Free Space Totaling, 
Message Processing 


Reads in F4 DSCB. Reads and 
accumulates space from F§ DSCB(s). 
If SMF information is required, 
volume label is read and type 19 
record is built and written to the 


SMF data set. If “MONITOR 
SPACE” is requested, space infor- 
mation is written in the caller’s 
message area, Dequeues VTOC, 
frees work area and returns to 
caller, 


Return 
to caller 


Chart9. LSPACE 


Input: 


Output: 


Input: 
Output: 


RO — UCB, Ri = SMF code in high order byte 
and —> message area in low order bytes. 


R7 — UCB, R9 > “MONITOR SPACE” message area, 
R13 — LSPACE work area (DEB/DCB, IOB, ECB, 
channel program to read F4 and first F5 DSCB, 
absolute address of F4 DSCB). If the device has the 
RPS feature, the channel program will have been 
modified to contain a set-sector command, If an 

error is encountered, an error message will be moved 
to the caller’s message area, R15 = completion code. 


See output from IGC0007H. 


If SMF information is requested, a type 19 record is 
written to the SMF data set. If “MONITOR SPACE” 
command has been issued, accumulated extent, 
cylinder, and track information will be moved to the 
caller's message area, pointed to by Rl. R15 = return 
code. 
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Entered via 
START SVC 98 


1GC0009H 
eee Input: RI] > protect parameter list (see OS/VS 2 System, 
mrolec ts Mnitializaten Programming Library: Data Management for contents of 
Validates parameter list passed, gets parameter list), R3 > CVT, R4 > current TCB. 
k il 
et ee a ae / ee ae Qutput: R6->0/C/EOV work area (DEB/DCB, 10B, ECB, 
DSCB for PASSWORD data set channel program, 1 DSCB for the PASSWORD 
oes phe asienureidence volun data set), R4—>Protect parameter list, R10 = entry 
: code for IGCO109H, R11 = completion code. 
1GCO109H | 
Proiect = P ; Input: R4 —> protect parameter list, R10 = code to indicate 
joe PORREE = INCAU ES HL Oe SsIng which routine 1s to be involved, add, replace, delete, 
Adds a nem (control) record or’ or list. R11 = completion code. R5 Protect work 
secondary redord to the PASSWORD area (DEB/DCB, 10B, ECB, channel program, I] 
data set. Replaces an existing pass- DSCB for PASSWORD data set). 
ae ae eee ii ig Output: When add, delete, or replace routines are executed, the 
Sol ceoniard any <econdne nay PASSWORD data set will be updated, When list 
fordataset-aame:, Liste SO-bvie routine is executed, the caller’s 80 byte buffer will 
data hieldots en cord y contain the record he requested. RS— work area; 
e R4 —protect parameter list, R11 = completion 
code for IGCO209H., 
1GC0209H 
Protect — DSCB Updating Input: RS — O/C/EOV work area (F1 DSCB for password 
data set, DEB/DCB, IOB, ECB, channel program). 
Updates F! DSCB for PASSWORD R4 — protect parameter list. 
data set when records have been 
added to the end of the data set. Output: [-1DSCB for PASSWORD data set may be modi- 


Updates I*1 DSCB of protected data 
| set whenever protection status of 

a control password is modificd. 
Builds volume list for the data set 

| using a LOCATE macro instruction; 
processes each entry, Releases work 
area and returns control. 


Returns to 
caller 


Chart 10. Protect 


fied; modified I*1 DSCBs for the protected data 
set will be written to the VTOC of each volume on 
which the data set resides, if the protection status 
has been changed. 


a PS TES SSS lili 
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MODULE DIRECTORY 


C 


This section contains a table of cross-references to the DADSM object 
modules with the function of each, the method of operation diagram and the 
module flowchart in which reference to the object module can be found. This 
information is followed by a table that tells which DADSM object modules 
are link-edited together at system generation. Note that the object module 


names, CSECT names, and the names that appear on microfiche of the 
DADSM object modules are the same. 
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Object Method of 
Module Operation Module 
Name Module Function Diagram Flowchart 
IGC0002G Obtain 25 8 
IGC0002I Scratch—initialization 18 5 
Part 1 of 2 
1GC0003B Allocate—initialization entry 4 1 
point Part 1 of 3 
1GC00030 Rename—initialization 24 7 
IGC0007H LSPACE—available space totaling, 26 9 
message processing 
IGC0009H Protect—initialization 27 10 
1GC0102G Obtain—VSAM data set 25 8 
IGC0107H LSPACE—initialization and input 26 9 
validation 
iS I1GC0109H Protect—request processing 27 10 
1GC0209H Protect—DSCB updating 27 10 
IGGOCLF2 Non-ISAM allocate—BPAM Directory 6 1 
Formatting Part 3 of 3 
IGGOI9EK RPSchannel program appendage module 4,6,15,18, 1, Part 1 of 4, 
20,22,24, and 12 
and 25 
I1GG020D0 _s Partial release—write back F1 DSCB 22 
1GG020D 1 Partial release—F5 DSCB (free space) 23 6 
updating 
1GG020P1 Partial release—initialization and F1 22 6 
DSCB updating 
1GG020P2 Partial release—F3 DSCB updating 22 6 
IGG020P3 Partial release—F4 (VTOC) DSCB 23 6 
' updating and termination 
IGG029DM — Scratch—Exit point dummy module 20 5 
Part 2 of 2 
IGGO029DU Initial load of scratch. Dummy 
module—passes control to IGC0002I. 
IGG0290A Scratch—password protection 19 5 
interface, VTOC search Part 1 of 2 
IGG0290B Scratch—F6 DSCB updating, 19 5 
split-cylinder data sets Part 2 of 2 
IGG0290C Scratch—F5 DSCB (free space) 20 5 
updating Part 2 of 2 
IGG0290D  Scratch—F4 (VTOC) DSCB updating 20 5 
Part 2 of 2 
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Object 
Module 
Name 


IGG0290E 


IGG0290F 
(alias= 
IGG0300F) 


IGG0299A 


IGG030DU 


IGG03001 
IGG03002 
IGG032I1 


IGG032I2 


IGG032I3 


IGG03214 


IGG032I5 


IGG03216 


IGG03217 


IGG032I18 


IGG0325A 


IGG0325B 


IGG0325C 


IGG0325D 


IGG0325E 


IGG0325G 


IGG0325H 


IGG0325I 


IGG0325K 


IGG0325P 


IGG0325Q 


Module Function 


Scratch—UCB Selection 


Scratch and Rename—volume 
demounting, mounting, and verification 


Scratch—DSCB removal 


Initial load of rename dummy module. 
Passes control to IGC00030. 


Rename—F1 DSCB updating 
Rename—UCB Selection 


ISAM allocate—verify checking 


ISAM allocate—free space (FS 
DSCB) search 


ISAM allocate—building F1, F2, 
and F3 DSCBs 


ISAM allocate—valid duplicate 
name F1 DSCB to be modified 


ISAM allocate—embedded index 
processing 


ISAM allocate—update F5 (free 
space) DSCBs \ 


ISAM allocate—F4 DSCB updating 
and error handling 


ISAM allocate—multivolume 
data set initialization 


Allocate—duplicate F1 DSCB 
search 


Non-ISAM allocate—request 
conversion and type determination 


Non-ISAM allocate—absolute 
track processing 


Non-ISAM allocate-search free 
space (normal cylinder and 
track requests) 


Non-ISAM allocate-building 
F1 and F3 DSCBs 


Non-ISAM allocate—F5 DSCB 
updating 


Non-ISAM allocate—F4 DSCB 
updating and error handling 


VIO Data Set Allocation 


Non-ISAM allocate—user-label 
extent allocaiton 


VTOC conversion—non-split-cylinder 
data set processing 


VTOC conversion—find split- 
cylinder data set extents 


19 


10 


10 


Module 
Flowchart 


5 
Part 1 of 2 


5 
Part 1 of 2 


11 
Part 2 of 2 


7 
7 


2 
Part 1 of 2 


2 
Part 1 of 2 


2 
Part 1 of 2 


2 
Part 1 of 2 


2 
Part 2 of 2 


2 
Part 2 of 2 


2 
Part 2 of 2 


2 
Part 2 of 2 


1 
Part 1 of 3 


1 
Part 1 of 3 


1 
Part 2 of 3 


1 
Part 2 of 3 


1 
Part 2 of 3 


1 
Part 3 of 3 


1 
Part 3 of 3 


7 
Part 3 of 3 


1 
Part 2 of 3 


3 
Part 1 of 2 


3 
Part 2 of 2 
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Object Method of 
Module Operation Module 
Name Module Function Diagram Flowchart 
IGG0325R VTOC conversion—F5 DSCB 12 3 
processing Part 1 of 2 
IGG0325T VTOC conversion—F5 conversion, 12 3 
F4 DSCB updating Part 1 of 2 
IGG0325U VTOC conversion—build F6 DSCBs 13 3 
Part 2 of 2 
IGG0325V VTOC conversion—check for F6 13 3 
extent overlap Part 2 of 2 
IGG0325W  VTOC conversion—set up to subtract 13 3 
F6 extents from F5; convert Fé DSCB Part 2 of 2 
extents 
9 
IGG0325Z VTOC Conversion—initialization 12 Part 1 of 2 
IGG0553A Extend—initialization 15 4 
Part 1 of 2 
IGG0553B Extend—free space (FS DSCB) 15 4 
search Part 1 of 2 
IGG0553C  Extend—F1/F3 build/update 16 4 
Part 2 of 2 
IGG0553D  Extend—Free space (F5 DSCB) 16 4 
updating Part 2 of 2 
IGGO0553E Extend—VTOC (F4) DSCB 16 4 
updating Part 2 of 2 
IGG0553F Extend—-VTOC conversion 15 4 
interface Part 1 of 2 
IGG0553G Extend—request conversion 15 4 
Part 1 of 2 


Load Module-to-Object Module Cross-Reference 


The following table indicates which object modules are included in each of 
the DADSM load modules. 


Load Module Object Modules Included in This Load Module 

IGC0003B IGC0003B, IGG0325A, 1GG0325B, IGG0325C, IGG0325D, IGG0325E, 
IGG0325G, IGG0325H, IGG03251, IGG0325K, IGG03211, IGG032I2, 
1GG03213, IGG03214, IGG03215, IGG03216, IGG03217, IGG032I8, 
IGGOCLF2 

IGG0325Z IGG0325P, IGG0325Q, IGG0325R, IGG0325T, IGG0325U, IGG0325V, 
IGG0325W, IGG0325Z 

IGG0553A IGG0553A, IGG0553B, IGG0553C, IGG0553D, IGG0553E, IGG0553F 
IGG0553G 

IGC0002I1 IGC0002I, IGG0290A, IGG0299A, IGG0290B, IGG0290C, IGG0290D, 
IGG0290E, IGG0290F, IGG029DU, IGG029DM 

IGGO020P1 IGG020P1, IGG020P2, IGG020P3, IGG020D0, IGG020D 1 

IGC00030 IGC00030, IGG03001, IGG03002, IGG030DU 

IGC0002G IGC0002G, IGC0102G 

IGC0007H IGC0007H, IGC0107H 

IGGOI9EK IGGOI9EK 

IGC0009H IGC0009H 

IGC0109H IGC0109H 

IGC0209H IGC0209H 
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DATA AREAS 


This section lists the control blocks and work areas used extensively by the 
DADSM routines and tells where the contents of these data areas can be 
found. This section also (1) presents and describes control blocks and work 
areas used only by the DADSM routines and (2) shows how related work 
areas are chained. 


System Data Areas Used by the DADSM Routines 


The following data areas and control blocks used by the DADSM routines can 
be found in OS/VS2 Data Areas, available only in microfiche: 


Allocate work area TECALLWA mapping macro) 
Extend work area (IECEXTWA mapping macro) 


Data set control blocks (format-1 through format-6). The DSCBs can also be 
found in OS/VS2 System Programming Library: Debugging Handbook. 


O/C/EOV main work area (IECDSECT mapping macro) 
Partial Release work area (IECPRLWA mapping macro) 
Scratch work area (IECSCRWA mapping macro) 


Data Areas Used Only by the DADSM Routines 


The following work areas and control blocks are used only by the DADSM 
routines and are described in this book: 


Extended Prefix to DADSM Work Areas 

Extent (DADSM) table 

LSPACE work area (IECLSPWA mapping macro) 
Obtain work area (IECOBTWA mapping macro) 
Password data set record 

Prefix to DADSM work areas 

Protect work area 

Recovery routine audit trail 

Rename work area (IECRENWA mapping macro) 
Transfer control table 


VTOC Conversion work area IECVTCWA mapping macro) 
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Extended Prefix 


Extent Table 
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The DADSM work areas are obtained using the IECRES GET macro 
instruction. An extended prefix is obtained only with the initial work area 
obtained to process a DADSM request. The extended prefix provides a 
register save area and the addresses of other data areas. The contents of the 
extended prefix follows: 


Offset 

Decimal Hex Length Name Description 

0 (0) 0 IECEXTPR Label to identify the beginning of 
the extended prefix 

0 (0) 72 IECREGSV 18-word register save area 

72 (48) 4 IECWTGTB Pointer to WTG table 

76 (4C) 4 IECRRPRM Pointer to recovery routine 
parameter list 

80 (50) 0 IECDAEND Label to identify the end of the 


extended prefix 


The extent (or DADSM) table is used to pass descriptions of allocated or 
released space extents modules of the Allocate, Extend, Scratch, and Partial 
Release routines. The extent table used in the Allocate and Extend routines is 
24 bytes long and can contain as many as 5 extent entries. The table used in 
the Scratch and Partial Release routines is 68 bytes long to accommodate as 
many as 16 extent entries. 


Number Used Remaining portion contains four 
Flags of hole RTA1 RTA2 (Allocate and Extend routines) or 
entries count fifteen (Scratch and Partial Release 
routines) one-word entries 
+0 20+ 4 +6 + 


1 +2 + 


8 


|-one Extent Entry 


The information contained in the flags field differs for each routine and can 
be determined by examining the program listing. 


The number of entries field contains the count of the number of extent 
entries in the extent table. 


The used-hole field contains the count of the number of format-1, format-2, 
format-3, format-5, and format-6 DSCBs added to and removed from the 
VTOC during allocation or releasing space. 


Each extent entry contains two binary numbers: RTA1 and RTA2. RTA1 is 
the relative track address of the first track of an extent area; RTA2 is the 
relative track address of the last track of the area, plus one. A relative track 
address is a binary number representing the displacement of the track from 
the first track of the volume. For example, the relative track address of track 
seven, cylinder zero is seven. The relative track address of track 3 on cylinder 
2 is 23, if the volume has ten tracks per cylinder. 


J 


C LSPACE Work Area 


The LSPACE work area, defined by IECLSPWA, is used to read DSCBs 
from the VTOC of volumes for which available space information is being 
gathered. Addressability for the work area is established at the beginning of 
the extended prefix (label LSPACWA). The extended prefix contains a 
register save area and pointers, and is followed by a WTG table (see 
“Extended Prefix” and “WTG Table” in this section). The last 24 bytes of 
the work area is an audit trail used by the DADSM recovery routines to 
release resources and record diagnostic information when an abnormal 
termination condition arises during LSPACE processing (see ““Recovery 
Routine Audit Trail” in this section). 


| -32(-20) LSPREFX or IECPREFX (32 bytes) | 


LSPACE work area prefix (see “Prefix to DADSM Work Areas”) 


0(0) LSPACWK A or IECEXPTR (80 bytes) 


Extended work area prefix (see ‘Extended Prefix’’) 


80(50) LWTGTBL (16 bytes) 


Where-to-go (WTG) table (see ‘“‘WTG Table’) 


96(60) F4IN (96 bytes) 
C Format-4 DSCB is read into this area 
192(C0) DSCBFS (144 bytes) 


Format-5 DSCBs are read into this area 


336(150) DEB (136 bytes) 


I/O control blocks (DEB/DCB, ECB, IOB) and channel program 
used to read from VTOC 


472(1D8) CVTAREA (44 bytes) 


Internal communication area 


516(204) LSPADTRL (24 bytes) 


LSPACE audit trail for use by recovery routines when ABEND 
condition arises (see “Recovery Routine Audit Trail’’) 


540(216) 
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Obtain Work Area 


The Obtain work area, defined by the IECOBTWA mapping macro, is used 
to read DSCBs from the VTOC. Addressability is established at the beginning 
of the extended prefix, label OBTNWKA. The work area prefix is used to 
chain this work area to other work areas and storage obtained to process the 
Obtain request (see ‘‘Prefix to DADSM Work Areas’’). The extended prefix 
contains a register save area and pointers and is followed by a where-to-go 
(WTG) table used to transfer control. (See ‘“Extended Prefix” and ‘““WTG 
Table” in this section for details). The last 24 bytes of the work area is an 
audit trail used by the DADSM recovery routines to release resources and 
record diagnostic information when an abnormal termination condition arises 
during Obtain processing (see ‘“‘Recovery Routine Audit Trail” in this 
section). 


| -32(-20) OBTPREFX or IECPREFX (32 bytes) | 


Obtain work area prefix (see “Prefix to DADSM Work Areas’’) 


0(0) OBTNWKA or IECEXTPR (80 bytes) 


Extended prefix and WTG table (see “Extended Prefix”) 


80(50) OWTGTBL (16 bytes) 
Where-to-go Table (see ““WTG Table” for details) 


96(60) F4DSCB (96 bytes) 


Format-4 DSCB is read into this area 


192(60) OBTDSCB (144 bytes) 


DSCB is read into this area, then moved to Caller’s area 


336(150) DEB (200 bytes) 


I/O control blocks (DEB/DCB, ECB, IOB) and channel program area 


536(218) ERCODE (20 bytes) 


Internal communication area 


556 (22C) OBTADTRL (24 bytes) 


Obtain audit trail for use by recovery routines when ABEND conditions 
arise during Obtain processing (see ‘““Recovery Routine Audit Trail’’) 


580(244) 
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Password Data Set Record Format 


C 52-byte “key” 80-byte ‘‘data area” 


—) a Sa 


Fully qualified 
data set name 


Logging field’ 


P d 
asswor (optional information) 


77 bytes 
Protection mode indicator - 1 byte 


Binary counter - 2 bytes 


When a password-protected data set is opened, the password entered by the 
operator is matched against the 52-byte “key” area. The data set name and 
password must be left-justified in their areas and all unused bytes must be 
blanks (X‘40’). The password may be one to eight alphameric characters. 
When the password record is generated, the counter field is set to zero 
(X‘0000’) or any initial value the user desires. Each time the data set is 
successfully opened (except when the data set is deleted or renamed), the 
binary counter is incremented by one. 


The protection mode indicator field can be set to any of four values: 


« X‘00’ to indicate that the password is a secondary password and the 
‘ protected data set is to be read only. 


e X‘80’ to indicate that the password is the control password and the 
protected data set is to be read only. 


e X‘Q1’ to indicate that the password is a secondary password and the 
protected data set is to be read and written. 


e X‘81’ to indicate the password is the control password and the protected 
data set is to be read and written. 


Since the DSCB of the protected data set is updated only when the control 
password is changed, it is possible to request protection attributes for 
secondary passwords that conflict with the protection attributes of the control 
password. The 77-byte logging field can contain any type of logging 
information that the installation chooses (for example, the date on which the 
counter was reset or the previous password used). 
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Prefix to DADSM Work Areas 


The DADSM work areas are obtained using the IECRES GET macro 
instruction. A prefix is obtained with each of these work areas. The prefix is 
used to chain the work areas together. See ‘“‘DADSM Work Area Chaining” 
for an example of the chaining scheme. The contents of the prefix fields 


Protect Work Area 
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follow: 

Offset 
Decimal Hex Length Name 
0 (0) 0 IECPREFX 
0 (0) 4 IECCORID 
4 (4) 4 Unused 
8 (8) IECCORLN 
12 (C) 4 IECCORAD 
16 (10) | IECCORKY 
17 (Qi) 2 
19 (13) 1 IECCORSP 
20 (14) IECCORPS 
24 (18) IECCORP1 
28 (ic) 4 IECCORP2 


Description 


Beginning label for the prefix to all 
O/C/EOV and DADSM work 
areas 


ID of this area. DADSM IDs: 
ALWA, Allocate work area; 
EXWA, Extend work area; LSWA, 
LSPACE work area; OBWA, 
Obtain work area, PRWA, Partial 
Release work area; REWA, 
Rename work area; SCWA, 
Scratch work area; RPSA, RPS 
work area; VCWA, VTOC 
conversion work area. 


Length of this area 


Address of the beginning of the 
extended prefix for this work area 


Storage protection key of this work 
area 


Subpool of this work area 
Pointer to initial (base) prefix 


Address of prefix of previous work 
area 


Address of prefix of next work area 


This work area is used by the protect routine to read from and write to the 
VTOC, using the OBTAIN macro instruction. It is not chained from or 


related to the other DADSM work areas. 


0(0) 


OBTWRK (96 bytes) 


96(60) 
OBTCCH (5 bytes) 


Obtain work space (249 bytes) 


101(65) 


i 350(15E) 1 


LOCAREA (26S bytes) 


Locate work space (volume list) 


C 


Recovery Routine Audit Trail 


This data area is used by the O/C/EOV-DADSM recovery routines 
(described in OS/VS2 Open/Close/EOV Logic) in freeing resources 
allocated to a DADSM routine that has encountered an abnormal termination 
condition. This audit trail tells which resources to free. The contents of the 


DADSM audit trail follow: 
Offset 
Decimal Hex Length 
0 (0) 24 
0 (0) 4 
0 (0) 1 
Leh ie 
el be 
ee 
ee 1 
1 (1) 1 
leek 
lene 
os are 
Sec Bi 
2 (2) 1 
3 (3) 1 
4 (4) 4 
8 (8) 4 
12 (C) 4 
16 (10) 4 
20 (14) 4 


Name 


ALLADTRL 


DSMADTW1 


DSMADTBI1 
DSMISAM 
DSMVIO 
DSMRPSAP 
DSMUCBAL 


DSMASWAP 


DSMADTB2 
DSMVTOCR 
DSMSMCE 
DSMTIOTE 
DSMDSNE 


DSMADTB3 
DSMADTB4 
DSMADTW2 


DSMADTW3 


DSMADTW4 


DSMADTWS5 
DSMADTW6 


Description 
DADSM Audit Trail Words 


DADSM switches 


General status switches 
ISAM Allocate 

VIO Allocate 

RPS appendage loaded 
UCB dynamically allocated 


SYSEVENT swap indicator 


ENQ status switches 
Enqueued on SYSVTOC 
Enqueued SMC on SYSVTOC 
Enqueued on SYSZTIOT 
Enqueued on SYSDSN 


Reserved 
Reserved 


Pointer to SYSZTIOT, the ENQ 
minor name for Obtain, Rename, 
and Scratch 


Pointer DSNAME for Obtain 
(search option), Rename, Partial 
Release, and Scratch. Pointer to the 
VDSCB for VIO allocate 


DSAB address for Rename and 
Scratch; DSAB list address for 
ISAM Allocate 


Reserved 


Reserved 


Data Areas 141 


Rename Work Area 
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The Rename work area, defined by the IECRENWA mapping macro, is used 
to read and write DSCBs. Addressability is established at the beginning of the 
extended prefix at label RENAMWKA. The work area prefix is used to chain 
this work area to other work areas and storage obtained to process the 
rename request (see “Prefix to DADSM Work Areas’’). The extended prefix 
contains a register save area and pointers and is followed by a WTG table 
(see ‘“Extended Prefix’”’ and ‘‘WTG Table” for contents of these areas). The 
last 24 bytes of the work area is an audit trail used by the DADSM recovery 
routines to release resources and record diagnostic information when an 
abnormal termination condition arises during Rename processing (see 
‘Recovery Routine Audit Trail’ for details). 


| -32(20) RENPRFX or IECPREFX (32 bytes) | 


Rename work area prefix (see ‘“‘Prefix to DADSM Work Areas’’) 


R13 
0(0) RENAMWKA or IECEXTPR (80 bytes) 
Extended prefix (see ‘““Extended Prefix’’) 


80(50) RWTGTBL (16 bytes) 
Where-to-go Table (see ‘“‘WTG Table’) 


96(60) VITOCDSCB (96 bytes) 


Format-4 DSCB is read into this area 


192(CO) F1DSCB (144 bytes) 


Area for reading from and writing to the VTOC 


336(150) WKADEB (192 bytes) 


I/O control blocks (DEB/DCB, ECB, IOB) and channel program 


$28(210) FIELD 1 (72 bytes) 


Rename work area fields 


600(258) RENADTRL (24 bytes) 


Rename audit trail for use by recovery routines when ABEND conditions 
arise during Rename processing (see ‘Recovery Routine Audit Trail’’) 


624(270) 


C 


Transfer Control Table 


The Transfer Control Table (a list of module names and their entry point 
addresses) is used to transfer control among the DADSM modules and the 
Close and EOV modules that give control to and receive control from the 
DADSM modules. The XCTL table appears at the end of each DADSM 
module as a result of the expansion of the XCTLTABL macro instruction. 
There are two options that can be used in coding the XCTLTABL macro, 
depending on how the module ID is coded in the ID= operand of the macro. 
If the full, 8-character module ID is coded, the result is as shown for “‘Entry 
for module B”’ in the illustration below. If only the last two characters of the 
ID are coded in the TD= operand of the macro, the result is as shown in 
“Entry for module C”’ below. The XCTL table in a given module will include 
an entry for every other module that can receive control from the given 
module. In the illustration, module A’s XCTL table includes two entries, one 
for module B and one for module C. These entries are followed by the 
maintenance patch area which is 5% of the size of the module it is associated 
with. The patch area is followed by the 8-byte module name, then the date 
the source module was assembled. Next appears the 6-byte release or PTF 
number, and the length in bytes of the load module. 


The XCTLTABL macro generates V-type address constants (VCONSs). 
These VCONS contain the entry point address of the object module with 
which the VCON is associated, if the object modules are in the same load 
module. If the object modules are in different load modules, the VCON will 
not be resolved and will contain zeros. When the IECRES LOAD macro is 
issued to transfer control, the service routine, IFGO19RA, checks to see if the 
VCON contains an address; if so, control is passed to the address in the 
VCON. If the VCON is unresolved, the service routine initiates a search of 
the link pack area for the entry point address of the object module to receive 
control. 


If you are modifying the DADSM routines, you should be aware that every 
unresolved VCON must have a defined entry point name or alias in the link 
pack area. 
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Entry for 
module B 


Entry for 
module C 


Object module A 


Full ID of a module that can receive control from module A 
(8 bytes) 


Entry point address of module B* (4 bytes) 


Last two bytes of ID 
of module C 


SVC number associated with 


b 
module C in EBCDIC evi 


cont, Entry point address of 
(2 bytes) module C* (3 bytes) 


Maintenance patch area (5% of the size of module A) 


CSECT (object module) name of module A (8 bytes) 


Date (month/day/year) of assembly of module A (8 bytes) 


Release or PTF number or SD code associated with 
module A (6 bytes) 


Length in bytes of 
object module A (2 bytes) 


If the object module is not in the same load module as module A, 
this field will contain zeros an unresolved YCON 


Transfer 
Control 
Table 


‘e VTOC Conversion Work Area 


WTG Table 


This work area, defined by the IECVTCWA mapping macro, is used during 
the conversion or reclamation of a VTOC to save the rebuilt format-5 DSCBs 
until they can be rewritten to the converted VTOC. Each work area can hold 
as many as three format-5 DSCBs. Each DSCB is chained to the previous 
format-5 DSCB using the VTCBPTR1, VTCBPTR2, or VTCBPTR3 field. 
This work area and all other related work areas are chained to the Allocate 
work area from the work area prefix (see ‘Prefix to DADSM Work Areas’’). 
The extended prefix contains a register save area and pointers (see ““Extended 
Prefix’’ for details). 


| -32(20) IECPREFX (32 bytes) | 


Work area prefix (see “Prefix to DADSM Work Areas’’) 


0(0) VICISTFS (152 bytes) 


First rebuilt FS DSCB is saved in this area until it is 
written back to the VTOC 


152(98) VITC2NDFS5 (152 bytes) 


Second rebuilt F5 DSCB 


304(130) VITC3RDFS5 (152 bytes) 


| Third rebuilt FS DSCB | 
urd rebu 456(1C8) 


The WTG table is used in conjunction with the IECRES LOAD macro 
instruction to transfer control. The IECRES macro is described in OS/VS2 
Open/Close/EOV Logic. 


Offset 
Decimal Hex Length Name Description 
0 (0) 4 WTGWTOPR Prefix for WTO 
4 (4) 8 WTGMODNM Name of object module that is to 
receive control. 
12 (C) 4 WTGMODEP Entry point address of object 


module that is to receive control. 
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DADSM Data Area Chaining 


To facilitate getting and releasing work areas, the DADSM work areas are 
chained together. To locate the work areas, it is therefore only necessary in 
most cases to know the contents of register 13 at the time a DADSM routine 
is executing. Register 13 contains the address of the extended prefix of a 
DADSM work area during most DADSM processing. This address is preceded 
by the prefix which contains the address of subsequently obtained work areas 
associated with the DADSM request. For example, Figure 6 shows the work 
area Chaining that results from the following conditions: (1) an allocation 
request (SVC 32) is issued (2) for a device that has the RPS feature and (3) 
the previous allocation on the volume was made under DOS, which 
necessitates VTOC conversion. 


ALWA! vewa! 


B (next) A (next) 
R13 
Allocate RPS VTOC 
Conversion 
Work 


Area 


Work Work 
Area Area 


1 Four-character identifiers that appear in the first four bytes of each prefix. The other DADSM work area identifiers are: EXWA, Extend work area; 
LSWA, LSPACE work area; OBWA, Obtain work area; PR WA, Partial Release work area; REWA, Rename work area; and SCWA, Scratch work area. 


Figure 6. Example of chaining of DADSM work area—allocation request on a device with the RPS feature, previous allocation 
mode under DOS 
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C DIAGNOSTIC AIDS 


Reclamation of VTOCs by the VTOC Conversion Routine 


If a system fails during a function in which the VTOC is being updated 
(Allocate, Extend, Scratch, or Partial Release processing) or if a permanent 
I/O error occurs when a DSCB is being read from or written to the VTOC, 
the VTOC may be in error. To ensure that the error caused by the 
interruption of DADSM processing is detected and corrected, an indicator 
called the DIRF bit (bit 5 of the DS4VTOCI field of the format-4 DSCB) is 
set when entering the routines that update the VTOC. The indicator is reset 
at exit, if no permanent I/O error has been encountered. Scratch and Partial 
Release routines set the DIRF bit when they encounter DSCBs with 
overlapping extents. The Allocate and Extend routines check the DIRF bit 
and request that the VTOC be reclaimed and restored by calling the VTOC 
Conversion routine if they find the indicator on during initialization. The 
VTOC Conversion routine is able to reclaim space that might have been lost 
during a system failure or I/O error, but when the same space has been 
allocated to two data sets, the VTOC Conversion routine cannot resolve the 
problem; the system programmer must decide how to correct the error. 


Deactivating Automatic VTOC Reclamation 


There are situations in which it may not be desirable to automatically convert 
or reclaim a VTOC that has the DIRF bit set in the format-4-DSCB. By 
applying a superzap or in-storage alteration to IGG0325Z, you can prevent 

C the VTOC from being automatically reclaimed. The job control language and 
control statement for altering IGG0325Z follow: 


Ty EXEC PGM=IMASPZAP 
//SYSLIB DD DSN=SYS1.LPALIB,DISP=OLD 
//SYSPRINT DD SYSOUT=A 
//SYSIN DD * 
NAME IGGO0325Z IGGO03252 
VERIFY 0000 0700 
REP 0000 0701 
/* 
DOS VTOC Conversion 


The same routines that reclaim an invalid VTOC convert a VTOC on which 
an allocation has been made by DOS. This conversion is requested during 
initialization for Allocate and Extend processing when the DOS bit is on. 
The DOS bit is bit O of the DS4VTOCI field of the format-4 DSCB. 
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Listing a VTOC Using IEHLIST 


When VTOC problems are encountered, the VTOC of the volume should be J 
printed out and examined. The IEHLIST utility (see ‘Listing a Volume Table 

of Contents” in OS/VS Utilities) can be used to print the VTOC; an 

example of the job control language and control statement follows: 


eh BXEC PGM=TEHLIST 

//DD1 DD UNIT=3330,DISP=OLD, Xx 

pf VOL=( PRIMATE, RETAIN, SER=111111 ) 

//SYSPRINT DD SYSOUT=A 

//SYSIN DD * > 
LISTVTOC DUMP , VOL=3330,111111 

/* 

Note: The PRIVATE subparameter is need on the DD1 statement to ensure ‘ 


that the VTOC being processed is not updated by another task during the 
listing process. 


Using the Transfer Control Table 


The transfer control table can be used to add a temporary change to a 
DADSM module and to locate a given object module in a storage dump. One 
example of a transfer control table appears in the ‘“‘Data Areas” section (see 
‘“‘Transfer Control Table’’). 


Locating an Object Module in a Storage Dump 


Unlike other system control program components, the module name of -) 
DADSM modules appears at the end of the module in the storage dump. The 

8-byte module name follows the maintenance patch area and precedes the 

date of assembly, the release or PTF number, and length of the moulde. 

Figure 7 shows the module name for module IFGO3001. The object code 

precedes this module name. 


Maintenance patch area Unresolved VCON 

for module IGG03001 for SECLDADA 
OE30ABO 20028042 31P001AB 40000005 080001B0 \ 00000000 06000060 40000060 B1000061 *........ cece cece eee ene ceeeuee * > 
OEJGAAO 40000005 29900000 6000002C 080001C8 &O000000 OBOD00DEC 40000060 12000287 * s 


OE 30ACO 9C7C7FO F3FOFOF2 00E30000 C9C7C7FO *,...............1GG03002.. .. IGG 
OE30AE0 


OE30B00 


00000000 06000000 00000000 00000000 00000000 00000000 00000000 00000000 


ABOVE LINE IS REPEATED 
O£30B40 100000000 00000000 00000000 00000000 {C9C7C7FO FIFOFOF1 FOF761FO F261F7F3 »® 


O£30B60 E8FOF2FO FBFOO7A8 00000000 00000000 0000000f00000000 00000000 P0000000 *¥02080......... een aahaaker ad 
OE30B80 Q000000QD 0000000Q00000000 00000000 OOOOOOGPO000000 00000000 Moo000000 * * 


OE30BA0 000000 00000000%~0000000 00000000 | 00000000fo0000000 00000000 0000000 *..............2... ee eee eee. 


Release number Length of object Module name Date (mm/dd/yy) 
(Y02080) module IGG03001 (I1GG03001) IGG03001 was 


in bytes (X‘7A8’) assembled ) 


Figure 7. Locating the transfer control table in a storage dump 
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eo Adding a Temporary Change in the Maintenance Patch Area of a DADSM Object Module 


A maintenance patch area is included in each DADSM module as the result of 
the expansion of the XCTLTABL macro. The maintenance patch area is 5% 
of the size of the object module and is located at the end of each module, 
immediately preceding the 8-byte module name. You can use the IMASPZAP 
utility to add a modification to an object module: 


1. Locate the Transfer Control Table in the source code. 


2. Locate the maintenance patch area in the Transfer Control Table. The 
beginning of the patch area is at the third label from the end of the transfer 
control table (and the end of the module). 


3. Using the displacement (location-counter value) of the maintenance patch 
area, verify that the patch area is all zeros, and apply the alteration to the 
object module. 


Note: 


e Remember to perform a cold start of the system after the alteration. A 
warm start will not reformat the PLPA to include your modification. 


e Be careful not to zap the unresolved V-type address constants in the 
transfer control table, which are zeros and immediately precede the 
maintenance patch area. 
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DADSM Allocate Return Codes 


The table that follows identifies each of the abnormal termination messages 
initiated by the DADSM Allocate modules and identifies the object module 
(CSECT) that detects the condition that results in the message. 


Return 


Code 
xX‘04 
X‘08’ 


x‘0C 


Message 
Identification 


IEF2531 
IEF2541 


IEF255] 


IEF256I 
JEF257] 


IEF258] 
IEF2601 
IEF2611 
JEF262] 
IEF263] 
JEF2641 


IEF266] 
IEF140] 


JEF2731 
IEF1271 
IEF 1281 
JEFI291 
JEF1301 


IEF1311 
IEF 132] 
IEF 1331 
IEF 134] 


IEF1351 
IEF1I36I 
IEF2671 
IEF1451 
IEF1411 
IEF 143] 


IEF476l 
IEF4771 


IEF478] 
IEF479] 


IEF7031 


IEF719] 
IEF7201 


Text 


Direct Access—Duplicate Name on Volume 
Direct Access—No Space in VTOC 


Direct Access—Permanent I/O Error or 
Invalid Fl DSCB found 


Direct Access—Absolute Track Not Available 
Direct Access—Space Requested Not Available 


Direct Access—Invalid Record Length 

Wrong DSORG or DISP 

No Prime Area Request for ISAM Data Set 

Prime Area Must be Requested Before OVFLOW 

Space Request Must Begin on Cylinder Boundary 
Duplication of DSNAME Elements Not 
Allowed—Same Area Requested Twice 

Invalid JFCB Pointer 

Directory Space Requested is Larger Than Amount 
Available on This Volume 

Invalid User-Label Request 

No Space Parameter Given for New Data Set 

Invalid Request for ISAM Index 

Multivolume Index Not Allowed 

DSNAME Element Wrong—Must be PRIME, INDEX, 
or OVFLOW 

Multivolume OVFLOW Request Not Allowed 

SPACE Parameter Wrong—CYL and ABSTR Conflict 
SPACE Parameter Wrong—CYL and CONTIG Conflict 
Subparameter Wrong in Space Parameter—Must be 
CYL or ABSTR 

Primary Space Request May Not be Zero 

Duplication in Allocation—Index Area Requested Twice 
Directory Space Request is Larger Than Primary Request 
Space Request Must be ABSTR for DOS Volume 

Index Request Must Precede Prime for ISAM Data Set 
Last Concatenated DD Card Unnecessary or 

Invalid for this Data Set 

Overlapping Data Sets in VTOC 


Overlapping DOS Split Cylinder 
Data Sets in VTOC 


VTOC Error May Exist—Analyze VTOC Listing 
Possible VTOC error on Second or Later Volume of 
ISAM Prime Data Set 


New Data Sets Not Allowed on Stacked Pack format 
DOS Volume 

Duplicate name defined to RACF 

Not authorized to define data sets 
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Detected by 


IGG0325A, [GG03211, IGG03218 
1IGG0325B, 1GG0325C, IGG0325D, 
1IGG03212 

IGGOCLF2, IGG0325A, 1GG0325C, 
IGG0325D, IGG0325E, IGG0325G, 
IGG0325H, IGG0325P, IGG0325Q 
1GG0325R, IGGO0325T 1GG0325U, 
IGG0325V, IGG0325W, 1GG0325Z, 
1GG03212, 1GG03213, 1GG03214, 
1GG03215, 1GG03216, 1|GG03217, 
IGGO03218 

IGG0325C, 1GG03251, 1IGG03212 
IGG0325C, IGG0325D, IGG0325K, 
IGG03251, 1IGG03212, 1IGG03217 
IGG0325A 

1IGG03211, IGG03213 

IGG032I1 

IGGO03211 

IGG03212 

IGG032I11 


IGG0325A 
IGG0325B, IGG0325E 


IGG0325A, IGG0325Z 
IGG03251, IGG0325C, 1GG0321 1 
IGG032I1 

IGG03211 

IGG032I1 


IGG03211 
IGGO032I11 
IGG032I1 
IGGO03211 


1GG03212, IGG0325C, 1GG03251 
1IGG032I1 

IGG0325B, IGG03251 

1GG03211 

IGG032I1 

1GG03211 


IGGO0325P, 1GGO325R 
IGG0325R 


1IGG0325Z 
1IGG03218 


IGG0325A 


1GG03213, 1GG03215, IGG0325E 
1GG03213, 1GG03215, IGG0325E 


C 


APPENDIX: EXTENT FORMAT CONVERSION 


All allocation and releasing of space are made in a number of tracks; 
therefore, each of the formats below must be converted to the 
relative-track-address format used by DADSM, called the RTA1/RTA2 
format. RTA1 is the relative track address of the first track of the extent. 
RTA2 is the relative track address of the last track plus one. The last track 
address is increased by one during the conversion process to simplify the 
calculations performed by the DADSM allocation and space releasing 
routines. 


The three extent formats used are: 


DSCB Format Extent Format Meaning 

|, 3, and 4 CCHH/CCHH The absolute cylinder (CC) and head address 
(HH) of the first and last track of the data set 

5 (free space) XXYYZ The first track of the available area (XX), The 


number of full cylinders (YY) in the available 
area, and the number of tracks (Z) in addition to 
the full cylinders 


6 (shared cylinders) XXYYZ The first track of the available area (XX), and 
the number of full cylinders (YY) in the 
available area; the Z is a count of the number of 
data sets sharing the cylinders 


When an allocation or space release has been completed by the DADSM 
routines, the extents in RTA1/RTA2 format must again be converted to the 
appropriate form (XX YYZ for format-5 and format-6 DSCBs or 
CCHH/CCHH for format-1, and format-3 DSCBs). Two resident routines 
are used to make the conversion, IECPCNVT to convert from 
CCHH/CCHH to RTA1/RTA2 and IECPRLTV to reverse the conversion. 
The conversions from XX YYZ to RTA1/RTA2 (and from RTA1/RTA2 to 
XX YYZ) for both the format-5 and format-6 are done by the DADSM 
allocate and space releasing routines. 
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INDEX 


For additional information about any subject listed in the 
index, refer to the publications that are listed under the same 
subject in OS/VS2 Master Index of Logic, GY28-0694. 


A 


absolute-track allocation 
by DOS 26 
request processing 
ISAM data sets 29 
non-ISAM data sets 26,54 
add routine 
(see Protect routine) 
address conversion 151 
Allocate routines (SVC 32) 25 
for ISAM data sets 28-33 
flow charts 117-118 
method of operation diagrams 61-67 
module summaries 117-118 
restrictions 89 
for non-ISAM data sets 26-28 
flowcharts 114,116 
method of operation diagrams 51-59 
module summaries 114,116 
messages 150 
module identifications 131-133 
return codes 150 
use of VTOC conversion routines 25 
allocation 
by absolute track 
ISAM data sets 29 
non-ISAM data sets 26,54 
of partitioned data sets 28,61 
suballocation option 75 
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ALX allocation method 27 
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available space DSCB 
(see free space DSCB) 
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blank (no option specified) allocation method 27 
BPAM directory formatting 58 
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catalog management interaction with Extend 79,79,81 
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(see extent formats) 
channel program modifications for RPS devices 54,80,98 
checkpoint/restart interaction with Partial Release 98-99 
Close routine requests for partial release 98-99 
CONTIG allocation method 27 
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converting DOS VTOCs to standard format 35 
converting extents from one format to another 151 
converting VTOCs for volumes containing split-cylinder data 

sets 32,74 

correcting a VTOC using the VTOC conversion routines 147 
CVOL 
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DADSM allocate return codes 150 
DADSM interrupt recording facility 26 
(see also DIRF) 
DADSM recovery routines 26 
DADSM table 
(see extent table) 
data areas 
Extent table 136 
LSPACE work area 137 
Obtain work area 138 
PASSWORD Data Set Record 139 
Protect work area 140 
Rename work area 143 
Transfer Control (XCTL) tabie 143 
VTOC conversion work area 145 
data set control block 
(see DSCB) 
deallocating space on direct-access storage devices 
(see Scratch routine) 
delete routine 
(see Protect routine) 
DEQ macro instruction 23 
device characteristics table, use by VTOC conversion 
routines 33 
diagnostic aids 145 
diagnostic records 24 
direct-access devices supported 23 
directory 131-133 
DIRF (DADSM interrupt recording facility) 24 
bit (bit 5 of DS4VTOCI field) 147 
processing 147 
in Allocate routines 
ISAM data sets 54,56 
non-ISAM data sets 37,78,80 
in Extend routine 54,60 
in Partial Release routine 98,100 
in Scratch routine 39,90 
DIRF-reclaimed bit (bit 6 of DS4VTOCI field) 34,73 
DOS-converted bit (bit 4 of DS4VTOCI field) 34,73 
dynamic de-allocation of UCB 92 
DSAB in ISAM Allocate routine 62 
DSCB 
defined 19-21 
format-O0 (free VTOC record) 21 
format-1 21 
(see also identifier DSCB) 
format-2 21 
(see also index DSCB) 
format-3 21 
(see also extension DSCB) 
format-4 21 
(see also VTOC DSCB) 
format-5 21 
(see also free space DSCB) 
format-6 21 
(see also shared extent DSCB) 
DSCB deletion and split-cylinder processing in Scratch 
routine 39 
drum storage allocation 27,61 
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DS4DSREC field of VTOC DSCB (hole count) 
limiting number of data sets on volume 23 
(see also VTOC (format-4) DSCB updating) 
DS4HPCHR field of VTOC DSCB (high-water mark) 
use by VTOC conversion routines 33 
(see also VTOC (format-4) DSCB updating) 
duplicate-name DSCB, search for 
in Allocate initialization 26,54 
in Extend routine 78 
in ISAM allocate routine 66 
in Rename routine 100 
DYNALLOC macro instruction 91 
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embedded index requests, ISAM data sets 31,64 
end-of-volume (EOV) interaction with Extend routine 78 
ENQ macro instruction 23 
error handling, ISAM allocation 33 
error recording 24 
Extend routine 35 
flowcharts 121-122 
method of operation diagrams 77,82 
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module summaries 121-122 
restrictions 35 
return codes 81 
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VTOC 78-79 
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by Extend routine 36,79 
for ISAM data sets 30,64 
for non-ISAM data sets 27,56 
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by Partial Release routine 40,98 
by Scratch routine 39,88 
description 21 
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by Extend routine 36,80 
by ISAM Allocate routine 64 
by Partial Release routine 40,98 
extent 
format conversion 151 
formats 151 
table 136 
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in Extend routines 36,78 
for ISAM data sets 62 
for non-ISAM data sets 26,56 
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formats, data set control blocks 21 
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format-0 DSCB 21 
format-1 DSCB 21 

(see also identifier DSCB) 
format-2 DSCB 21 

(see also index DSCB) 
format-3 DSCB 21 

(see also extension DSCB) 
format-4 DSCB 21 

(see also VTOC DSCB) 
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format-5 DSCB 21 
(see also free space DSCB) 
format-6 DSCB 21 
(see also shared extent DSCB) 
free space (format-5) DSCB 
creating 
by IEBDASDI and IEHDASDR utilities 17 
by VTOC Conversion routine 70, 74 
updating 
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by Extend routine 78-80 
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by non-ISAM allocate routine 56 
by Partial Release routine 100 
by Scratch routine 98 
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(see Scratch and Partial Release routines) 
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high-water mark 

(see VTOC (format-4) DSCB updating) 
hole count 

(see VTOC (format-4) DSCB updating) 
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ICBMNTDE macro instruction 85,103 
identifier (format-1) DSCB 
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by Extend routine 36,80 
by ISAM Allocate routine 30,54 
by non-ISAM Allocate routine 27,56 
deleting 39,90 
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by Extend routine 36,80 
by ISAM Allocate routine 29,64 
by Partial Release routine 40,98 
for password-protected data sets (Protect 
routine) 46,110 
by Rename routine 42,102 
IEBDASDI, use in preparing DASD volumes for use 17 
IECPCNVT, use by DADSM routines 151 
IECPRLTV, use by DADSM routines 151 
IECRES macro 24 
IEFSSREQ macro instruction 39, 85, 103 
IEHDASDR, use in preparing DASD volumes 17 
IEHLIST, use of, in dumping the contents of aVTOC 148 
1GCxxxxxx module identifications 131-133 
IGGxxxxx module identifications 131-133 
index area allocation 31 
index (format-2) DSCB 
conditions under which built 31 
creating 30-32 
deleting 39,88 
description 21 
initial allocation methods 
ALX, MXIG, CONTIG, blank 27 
ISAM data set restrictions 29 
initializing a DASD volume 17 


ISAM allocation 
(see Allocate routines) 
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JES-managed MSS virtual volume 
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(see standard user label) 

volume, used to find VTOC 19 
larger load modules 14 
list routine 

(see Protect routines) 
LOCATE 

command (VSAM) 43,106 

macro instruction, issued by Protect routine 46 
locating the VTOC 19 
locating VSAM data set information 43 
LSPACE routines (SVC 78) 

flowchart 128 

messages 109 

method of operation diagram 108 

module identifications 131-133 

module summaries 128 

return codes 44 

work arealayout 137 
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macros 

DEQ 23 

DYNALLOC 93 

ENQ 22 

ICBMNTDE 85, 103 

IECRES 26 

IEFSSREQ 39, 85, 103 

LOCATE 46 

OBTAIN 43 

PROTECT 45 

RENAME 42 

RESERVE 23 

SCRATCH 38 
mass-storage volume 83-89, 95, 103, 105 
messages 

Allocate 150 

LSPACE 109 
module directory 131-133 
multiple-volume data sets 

ISAM allocation 32,66 

renaming 42 

scratching 40 
multivolume processing,ISAM data sets 32,66 
MXIG allocation method 27 
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OBTAIN macro instruction 43 
Obtain routine (SVC 27) 43 
flowchart 127 
method of operation diagram 106 
module identifications 131 
module summaries 127 
return codes 107 
for VIO datasets 44 
work area layout 138 


overflow area allocation 31 
O/C/EOV—DADSM service routines (IFGOI9RA) 14 
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Partial Release routine 

method of operation diagrams 97, 101 

module summaries 125 

module identifications 131 

overview 97 

return codes 101 

use by Checkpoint/Restart 98-99 

use by Close 98-99 
partitioned data sets, formatting directories for 28 
PASSWORD data sets 

record format 139 

rename processing 43,102 

scratch processing 39,88 

(see also Protect routines) 
PASSWORD-protection 

processing 39,110 


interface 
Rename 102 
Scratch 88 


“preferred” track for extending a data set 36,78 
preparing a DASD volume for use 17 
prime area 

allocation 31 

with embedded index 31, 64 
PROTECT macro instruction 45 
Protect routines (SVC 98) 45 

flowchart 129 

method of operation diagram 110 

module identifications 131 

return codes 111 

work area layout 140 
protection-mode indicator 110 
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RACF 13 
deletion 39,88-89,123-124 
extension 37,80-81,122 
ISAM allocation 31,64-65,117-118 
non-ISAM allocation 27,56,57,115 
renaming 43, 102-103,126 
reading a DSCB from the VTOC 
(see Obtain routine) 
recovery routines 24 
reformatting DOS VTOCs 
(see VTOC conversion routines) 
Release routines 
(see Partial Release routines) 
flowchart 125 
release-must-complete 
(see DEQ) 
Rename routine (SVC 30) 42 
flowchart 126 
method of operation diagram 102,105 
module identifications 131-132 
parameter list 102 
return codes 105 
Status code 105 
work area layout 142 
RENAME macro instruction 42 
renaming password-protected data sets 102 
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replace routine 

(see Protect routine) 
reposition I/O module, use of Partial Release routine 98-99 
RESERVE macro instruction, use in enqueuing VTOC 21 
Resource Access Control Facility (see RACF) 
return codes 

from Allocate routines 150 

from Extend routine 81 

from LSPACE routine 109 

from Obtain routine 107 

from Partial Release 101 

from Rename routine 105 

from SECLOADA (Open/EOV password protection) 

to Rename 46,102 
to Scratch 45,88 

from Scratch 93 
routines 

Allocate 25,51 

Extend 35,77 

LSPACE 46,108 

Obtain 43,105 

Partial Release 40, 97 

Protect 45,110 

Rename 42,102 

Scratch 38,83 

(see also directory) 
RPS (rotational position sensing) support simplified 15 
RTAI/RTA?2 151 
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scheduler interaction 
with Allocate routines 20,54 
with Scratch routine 40 
Scratch routine (SVC 29) 40,83 
flowcharts 123-124 
method of oepration diagrams 83,93 
module identifications 131-132 
module summaries 123-124 
return codes 93 
status code 93 
SCRATCH macro instruction 38 
scratching 
password-protected data sets 39,88 
split-cylinder data sets 39,88 
VIO datasets 84 
search option 
( see Obtain routines) 
SECLOADA module of Open Security 
used by Rename 43,102 
used by Scratch 45,88 
secondary allocation 
(see Extend routines) 
seek option 
(see Obtain routines) 
service 
functions, VTOC 42-46 
routine (IFGOI9RA) 14 
set-must-complete option 
{see ENQ) 
shared cylinders 
( see split-cylinders) 
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shared extent (format-6) DSCB 
deleting 
by VTOC Conversion routine 33,70 
by Scratch routine 39 
description 21 
creating 
by VTOC Conversion routines 34,74 
size, VTOC 22 
SMF 
in LSPACE 45 
in Partial Release 41 
in Rename (type-18 record) 43 
in Scratch (type-17 record) 40 
type-17 record 40 
type-18 record 43 
type-19 record 45 
space requirements by device type, VTOC 22 
split-cylinder allocation operation deleted 13 
split-cylinder data set 
converting a VTOC that contains 34,77 
scratching 39,88 
split-cylinder processing, by VTOC Conversion 
routines 34,77 
standard user labels, allocation of track 26,56 
standard volume label 19 
suballocation option deleted 14 
SUL 
(see standard user labels) 
summary of amendments 13 
SVC 27 
(see Obtain routine) 
SVC 29 
(see Scratch routine) 
SVC 30 
(see Rename routine) 
SVC 32 
(see Allocate routine) 
SVC 78 
(see LSPACE routine) 
SVC 98 
(see Protect routine) 
SVC 126 39, 85, 91, 93, 104 
system management facilities 
(see SMF) 
SYS1.DUMP data set 24 
SYS1.LOGREC data set 24 
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table 
extent 136 
transfer control (XCTL) 143 
transfer control (XCTL) table 
definition 143 
use in locating object module in a storage dump 148 
use in adding a temporary change to an object 
module 149 
transfer of control, method of 14 
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user count (number of data sets sharing an extent) 39 
user labels 
(see standard user labels) 
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valid duplicate-name DSCB 29,66 
VIO data set 
allocation 26-27,54,58 
Obtain processing 44 
virtual DSCB 58 
virtual input/output 
(see VIO) 
virtual volumes, MSS 38,85-95, 103, 105 
volume table of contents 19 
contents of 19 
conversion 54,78 
data set, contents of 20 
enqueuing and dequeuing 23 
integrity 23 
locating 20 
reclamation 44,78 
service functions 42-46 
size 22 
VOLVTOC field of the standard volume label 20 
VSAM 4 
interaction with Allocate 54 
interaction with Extend 78 
interaction with Scratch 38,83 
LOCATE command 106,143 
renaming unique data set 42 
VTOC 3 
(see volume table of contents) 
VTOC Conversion routine 33 
flowcharts 119-120 
limitations 34 
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method of operation diagrams 69,75 
module identifications 131-133 
module summaries 119-120 
return codes 150 
work area layout 143 
VTOC (format-4) DSCB 
creating 17 
description 21 
DIRF bit of DS4VTOCI field 
(see DIRF) 
high-water mark 
(see DS4HPCHR field) 
hole count 
(see DS4DSREC field) 
how located 20 
updating 
by Extend routines 37,80 
by VTOC Conversion routines 34,70 
for ISAM datasets 32,66 
for non-ISAM data sets 28,58 
by Partial Release routine 41,100 
by Scratch routine 40,92 
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work areas 
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XCTL macro instruction, replacement of 14 
XCTL table 

(see Transfer Control Table) 
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zero-quantity request 26,54 
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3330 Disk Storage 24 

3333 Disk Storage and Control 24 

3340 Direct Access Storage Facility 24 

3344 Direct Access Storage 24 

3350 Direct Access Storage 24 

3850 Mass Storage System 38, 85-93, 95, 103, 105 


Index 157 


SY26-3828-2 


@ 


International Business Machines Corporation 
Data Processing Division 
1133 Westchester Avenue, White Plains, N.Y. 10604 


IBM World Trade Americas/Far East Corporation 


Town of Mount Pleasant, Route 9, North Tarrytown, N.Y., U.S.A. 10591 


IBM World Trade Europe/Middle East/Africa Corporation 
360 Hamilton Avenue, White Plains, N.Y., U.S.A. 10601 


31607 WSdvVad ZSA/SO 


(O€-OZES “ON Af!4) 


CBCB8E-9CAS “WSN Ul palulid 


Staples can cause problems with automated mail sorting equipment. 


Note: 


Please use pressure sensitive or other gummed tape to seal this form. 


OS/VS2 DADSM Logic Reader’s 
Comment 
SY 26-38 28-2 Bonn 


This manual is part of a library that serves as a reference source for systems analysts, programmers, and Operators of 
IBM systems. This form may be used to communicate your views about this publication. They will be sent to the 
author’s department for whatever review and action, if any, is deemed appropriate. Comments may be written in 
your own language; use of English is not required. 

IBM may use or distribute any of the information you supply in any way it believes appropriate without 
incurring any obligation whatever. You may, of course, continue to use the information you supply. 
Note: Copies of IBM publications are not stocked at the location to which this form is addressed. Please direct 
any requests for copies of publications, or for assistance in using your IBM system, to your IBM representative 
or to the IBM branch office serving your locality. 


List TNLs here: 

If you have applied any technical newsletters (TNLs) to this book, please list them here: 
Last TNL 
Previous TNL 


Previous TNL 


Fold on two lines, tape, and mail. No postage necessary if mailed in the U.S.A. (Elsewhere, 
any IBM representative will be happy to forward your comments.) Thank you for your 
cooperation. 


SY26-3828-2 


Reader’s Comment Form 


eCPM OCCT HF OHO HOH OOO CEDREF OTOH ASH H OF OTGeOOCBEF HEHEHE HOH HADES HOHEHSE SEH EH EH HEE CHE HE HEHEHE HHH HREHOH OHHH HOH OTOH HOO HHEHHH OOH EHO HHH HOMO HOCH OE OED OEE oe evereveer, 


SPREE ESNet 
EE 
I 
= ms 7 
wen a 
EES Cte ACARI 
re i 
bl i A 
ee es =_- 
wr — aes 
nen 
sd 
A bs 


Fold and Tape 


BUSINESS REPLY MAIL 


ARMONK,N.Y. 


FIRST CLASS PERMIT NO. 40 


POSTAGE WILL BE PAID BY ADDRESSEE: 


iBM Corporation 

P.O. Box 50020 
Programming Publishing 
San Jose, California 95150 


Fold and Tape 


international Business Machines Corporation 
Data Processing Division 
1133 Westchester Avenue, White Plains, N.Y. 10604 


iEM World Trade Americas/Far East Corporation 
Town of Mount Pleasant, Route S, North Tarrytown, N.Y., U.S.A. 10591 


IBM World Trade Europe/Middle East/Africa Corporation 
360 Hainiiton Avenue, White Plains, N.Y., U.S.A. 10601 


NO POSTAGE 
NECESSARY 
IF MAILED 

IN THE 

UNITED STATES 


Corer eteeeeenceos 


91607 WSGVd ZSA/SO 


(O€-OZES “ON Ai!) 


C8C8E-9CAS “WSN U! paiutid 


= == =2== / Technical Newsletter This Newsletter No.  SN26-0938 
Date March 30, 1979 


Base Publication No. SY26-3828-2 
File No. $370-30 


Prerequisite Newsletters None 


OS/VS2 MVS DADSM Logic 


©Copyright IBM Corp. 1974, 1975, 1978 


This technical newsletter, a part of Release 3.8 of OS/VS2, provides replacement pages for the 
subject publication. These replacement pages remain in effect for any subsequent releases unless 
specifically altered. Pages to be inserted and/or removed are: 


cover, edition notice 
93-95 
125, 126 


( 131-133 
Each technical change is marked by a vertical bar to the left of the change. 
Summary of Amendments 


Changes included in this newsletter are summarized under “‘Summary of Amendments’”’ following 
the list of diagrams. 


Note: Please file this cover letter at the back of the publication to provide a record of changes. 


IBM Corporation, P.O. Box 50020, Programming Publishing, San Jose, California 95150 


Printed in U.S.A, 


